extra/symbols/symbols.factor

   1 ! Copyright (C) 2008 Doug Coleman.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: parser lexer sequences words kernel classes.singleton
   4 classes.parser ;
   5 IN: symbols
   6
   7 : SYMBOLS:
   8     ";" parse-tokens
   9     [ create-in dup reset-generic define-symbol ] each ;
  10     parsing
  11
  12 : SINGLETONS:
  13     ";" parse-tokens
  14     [ create-class-in define-singleton-class ] each ;
  15     parsing