| 
									
										
										
										
											2008-12-17 19:12:59 -05:00
										 |  |  | ! Copyright (C) 2007, 2008 Slava Pestov. | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  | ! See http://factorcode.org/license.txt for BSD license. | 
					
						
							| 
									
										
										
										
											2008-12-17 19:12:59 -05:00
										 |  |  | USING: words words.symbol sequences vocabs kernel ;
 | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  | IN: bootstrap.syntax | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2008-03-18 22:45:04 -04:00
										 |  |  | "syntax" create-vocab drop
 | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  | 
 | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  |     "!" | 
					
						
							|  |  |  |     "\"" | 
					
						
							|  |  |  |     "#!" | 
					
						
							| 
									
										
										
										
											2009-03-22 19:00:26 -04:00
										 |  |  |     "(" | 
					
						
							| 
									
										
										
										
											2008-06-08 16:32:55 -04:00
										 |  |  |     "((" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  |     ":" | 
					
						
							|  |  |  |     ";" | 
					
						
							|  |  |  |     "<PRIVATE" | 
					
						
							|  |  |  |     "BIN:" | 
					
						
							|  |  |  |     "B{" | 
					
						
							|  |  |  |     "C:" | 
					
						
							|  |  |  |     "CHAR:" | 
					
						
							|  |  |  |     "DEFER:" | 
					
						
							| 
									
										
										
										
											2008-03-19 22:15:38 -04:00
										 |  |  |     "ERROR:" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  |     "FORGET:" | 
					
						
							|  |  |  |     "GENERIC#" | 
					
						
							|  |  |  |     "GENERIC:" | 
					
						
							|  |  |  |     "HEX:" | 
					
						
							|  |  |  |     "HOOK:" | 
					
						
							|  |  |  |     "H{" | 
					
						
							|  |  |  |     "IN:" | 
					
						
							|  |  |  |     "INSTANCE:" | 
					
						
							|  |  |  |     "M:" | 
					
						
							|  |  |  |     "MAIN:" | 
					
						
							|  |  |  |     "MATH:" | 
					
						
							|  |  |  |     "MIXIN:" | 
					
						
							|  |  |  |     "OCT:" | 
					
						
							|  |  |  |     "P\"" | 
					
						
							|  |  |  |     "POSTPONE:" | 
					
						
							|  |  |  |     "PREDICATE:" | 
					
						
							|  |  |  |     "PRIMITIVE:" | 
					
						
							|  |  |  |     "PRIVATE>" | 
					
						
							|  |  |  |     "SBUF\"" | 
					
						
							| 
									
										
										
										
											2008-04-02 16:41:29 -04:00
										 |  |  |     "SINGLETON:" | 
					
						
							| 
									
										
										
										
											2008-12-17 19:10:01 -05:00
										 |  |  |     "SINGLETONS:" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  |     "SYMBOL:" | 
					
						
							| 
									
										
										
										
											2008-12-17 19:10:01 -05:00
										 |  |  |     "SYMBOLS:" | 
					
						
							|  |  |  |     "CONSTANT:" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  |     "TUPLE:" | 
					
						
							| 
									
										
										
										
											2008-06-28 03:36:20 -04:00
										 |  |  |     "SLOT:" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  |     "T{" | 
					
						
							|  |  |  |     "UNION:" | 
					
						
							| 
									
										
										
										
											2008-05-10 19:09:05 -04:00
										 |  |  |     "INTERSECTION:" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  |     "USE:" | 
					
						
							|  |  |  |     "USING:" | 
					
						
							| 
									
										
										
										
											2008-12-17 19:10:01 -05:00
										 |  |  |     "QUALIFIED:" | 
					
						
							|  |  |  |     "QUALIFIED-WITH:" | 
					
						
							|  |  |  |     "FROM:" | 
					
						
							|  |  |  |     "EXCLUDE:" | 
					
						
							|  |  |  |     "RENAME:" | 
					
						
							|  |  |  |     "ALIAS:" | 
					
						
							| 
									
										
										
										
											2009-03-21 02:27:50 -04:00
										 |  |  |     "SYNTAX:" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  |     "V{" | 
					
						
							|  |  |  |     "W{" | 
					
						
							|  |  |  |     "[" | 
					
						
							|  |  |  |     "\\" | 
					
						
							| 
									
										
										
										
											2009-04-06 03:57:39 -04:00
										 |  |  |     "M\\" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  |     "]" | 
					
						
							|  |  |  |     "delimiter" | 
					
						
							|  |  |  |     "f" | 
					
						
							|  |  |  |     "flushable" | 
					
						
							|  |  |  |     "foldable" | 
					
						
							|  |  |  |     "inline" | 
					
						
							| 
									
										
										
										
											2008-07-18 20:22:59 -04:00
										 |  |  |     "recursive" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  |     "t" | 
					
						
							|  |  |  |     "{" | 
					
						
							|  |  |  |     "}" | 
					
						
							|  |  |  |     "CS{" | 
					
						
							| 
									
										
										
										
											2007-12-21 21:18:24 -05:00
										 |  |  |     "<<" | 
					
						
							|  |  |  |     ">>" | 
					
						
							| 
									
										
										
										
											2008-04-02 22:27:49 -04:00
										 |  |  |     "call-next-method" | 
					
						
							| 
									
										
										
										
											2008-06-28 03:36:20 -04:00
										 |  |  |     "initial:" | 
					
						
							| 
									
										
										
										
											2008-06-30 02:44:58 -04:00
										 |  |  |     "read-only" | 
					
						
							| 
									
										
										
										
											2009-03-16 21:11:36 -04:00
										 |  |  |     "call(" | 
					
						
							|  |  |  |     "execute(" | 
					
						
							| 
									
										
										
										
											2007-09-20 18:09:08 -04:00
										 |  |  | } [ "syntax" create drop ] each
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | "t" "syntax" lookup define-symbol |