core/bootstrap/syntax.factor

   1 ! Copyright (C) 2007, 2008 Slava Pestov.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: words words.symbol sequences vocabs kernel ;
   4 IN: bootstrap.syntax
   5
   6 "syntax" create-vocab drop
   7
   8 {
   9     "!"
  10     "\""
  11     "#!"
  12     "("
  13     "(("
  14     ":"
  15     ";"
  16     "<PRIVATE"
  17     "BIN:"
  18     "B{"
  19     "BV{"
  20     "C:"
  21     "CHAR:"
  22     "DEFER:"
  23     "ERROR:"
  24     "FORGET:"
  25     "GENERIC#"
  26     "GENERIC:"
  27     "HEX:"
  28     "HOOK:"
  29     "H{"
  30     "IN:"
  31     "INSTANCE:"
  32     "M:"
  33     "MAIN:"
  34     "MATH:"
  35     "MIXIN:"
  36     "OCT:"
  37     "P\""
  38     "POSTPONE:"
  39     "PREDICATE:"
  40     "PRIMITIVE:"
  41     "PRIVATE>"
  42     "SBUF\""
  43     "SINGLETON:"
  44     "SINGLETONS:"
  45     "SYMBOL:"
  46     "SYMBOLS:"
  47     "CONSTANT:"
  48     "TUPLE:"
  49     "SLOT:"
  50     "T{"
  51     "UNION:"
  52     "INTERSECTION:"
  53     "USE:"
  54     "UNUSE:"
  55     "USING:"
  56     "QUALIFIED:"
  57     "QUALIFIED-WITH:"
  58     "FROM:"
  59     "EXCLUDE:"
  60     "RENAME:"
  61     "ALIAS:"
  62     "SYNTAX:"
  63     "V{"
  64     "W{"
  65     "["
  66     "\\"
  67     "M\\"
  68     "]"
  69     "delimiter"
  70     "deprecated"
  71     "f"
  72     "flushable"
  73     "foldable"
  74     "inline"
  75     "recursive"
  76     "t"
  77     "{"
  78     "}"
  79     "CS{"
  80     "<<"
  81     ">>"
  82     "call-next-method"
  83     "initial:"
  84     "read-only"
  85     "call("
  86     "execute("
  87 } [ "syntax" create drop ] each
  88
  89 "t" "syntax" lookup define-symbol