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     "USING:"
  55     "QUALIFIED:"
  56     "QUALIFIED-WITH:"
  57     "FROM:"
  58     "EXCLUDE:"
  59     "RENAME:"
  60     "ALIAS:"
  61     "SYNTAX:"
  62     "V{"
  63     "W{"
  64     "["
  65     "\\"
  66     "M\\"
  67     "]"
  68     "delimiter"
  69     "f"
  70     "flushable"
  71     "foldable"
  72     "inline"
  73     "recursive"
  74     "t"
  75     "{"
  76     "}"
  77     "CS{"
  78     "<<"
  79     ">>"
  80     "call-next-method"
  81     "initial:"
  82     "read-only"
  83     "call("
  84     "execute("
  85 } [ "syntax" create drop ] each
  86
  87 "t" "syntax" lookup define-symbol