basis/ui/tools/listener/completion/completion-tests.factor

   1 ! Copyright (C) 2009 Slava Pestov.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: tools.test ui.tools.listener.completion ;
   4 IN: ui.tools.listener.completion.tests
   5
   6 [ t ] [ { "USING:" "A" "B" "C" } complete-USING:? ] unit-test
   7
   8 [ f ] [ { "USING:" "A" "B" "C" ";" } complete-USING:? ] unit-test
   9
  10 [ t ] [ { "X" ";" "USING:" "A" "B" "C" } complete-USING:? ] unit-test