KickJava   Java API By Example, From Geeks To Geeks.

Java > Open Source Codes > org > armedbear > lisp > Keyword


1 /*
2  * Keyword.java
3  *
4  * Copyright (C) 2002-2004 Peter Graves
5  * $Id: Keyword.java,v 1.36 2004/06/08 10:52:54 piso Exp $
6  *
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License
9  * as published by the Free Software Foundation; either version 2
10  * of the License, or (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
20  */
21
22 package org.armedbear.lisp;
23
24 public final class Keyword extends Lisp
25 {
26     public static final Symbol internKeyword(String JavaDoc s)
27     {
28         return PACKAGE_KEYWORD.intern(s);
29     }
30
31     public static final Symbol
32         ABCL = internKeyword("ABCL"),
33         ABORT = internKeyword("ABORT"),
34         ABSOLUTE = internKeyword("ABSOLUTE"),
35         ALLOW_OTHER_KEYS = internKeyword("ALLOW-OTHER-KEYS"),
36         ANSI_CL = internKeyword("ANSI-CL"),
37         APPEND = internKeyword("APPEND"),
38         ARMEDBEAR = internKeyword("ARMEDBEAR"),
39         BACK = internKeyword("BACK"),
40         BOOLEAN = internKeyword("BOOLEAN"),
41         CAPITALIZE = internKeyword("CAPITALIZE"),
42         CAPITALIZE_FIRST = internKeyword("CAPITALIZE-FIRST"),
43         CASE = internKeyword("CASE"),
44         COMMON = internKeyword("COMMON"),
45         COMMON_LISP = internKeyword("COMMON-LISP"),
46         COMPILE_TOPLEVEL = internKeyword("COMPILE-TOPLEVEL"),
47         COUNT_ONLY = internKeyword("COUNT-ONLY"),
48         DARWIN = internKeyword("DARWIN"),
49         DATUM = internKeyword("DATUM"),
50         DECLARED = internKeyword("DECLARED"),
51         DEFAULT = internKeyword("DEFAULT"),
52         DEFAULTS = internKeyword("DEFAULTS"),
53         DEVICE = internKeyword("DEVICE"),
54         DIRECTORY = internKeyword("DIRECTORY"),
55         DIRECT_SUPERCLASSES = internKeyword("DIRECT-SUPERCLASSES"),
56         DOWNCASE = internKeyword("DOWNCASE"),
57         ELEMENT_TYPE = internKeyword("ELEMENT-TYPE"),
58         END = internKeyword("END"),
59         ERROR = internKeyword("ERROR"),
60         EXECUTE = internKeyword("EXECUTE"),
61         EXPECTED_TYPE = internKeyword("EXPECTED-TYPE"),
62         EXTERNAL = internKeyword("EXTERNAL"),
63         FILL_POINTER = internKeyword("FILL-POINTER"),
64         FORMAT_ARGUMENTS = internKeyword("FORMAT-ARGUMENTS"),
65         FORMAT_CONTROL = internKeyword("FORMAT-CONTROL"),
66         HOST = internKeyword("HOST"),
67         INHERITED = internKeyword("INHERITED"),
68         INITIAL_CONTENTS = internKeyword("INITIAL-CONTENTS"),
69         INITIAL_ELEMENT = internKeyword("INITIAL-ELEMENT"),
70         INPUT = internKeyword("INPUT"),
71         INSTANCE = internKeyword("INSTANCE"),
72         INTERNAL = internKeyword("INTERNAL"),
73         INVERT = internKeyword("INVERT"),
74         IO = internKeyword("IO"),
75         J = internKeyword("J"),
76         LINUX = internKeyword("LINUX"),
77         LOAD_TOPLEVEL = internKeyword("LOAD-TOPLEVEL"),
78         LOCAL = internKeyword("LOCAL"),
79         NAME = internKeyword("NAME"),
80         NEWEST = internKeyword("NEWEST"),
81         NICKNAMES = internKeyword("NICKNAMES"),
82         NO_ERROR = internKeyword("NO-ERROR"),
83         OBJECT = internKeyword("OBJECT"),
84         OPERANDS = internKeyword("OPERANDS"),
85         OPERATION = internKeyword("OPERATION"),
86         OUTPUT = internKeyword("OUTPUT"),
87         OVERWRITE = internKeyword("OVERWRITE"),
88         PACKAGE = internKeyword("PACKAGE"),
89         PATHNAME = internKeyword("PATHNAME"),
90         PUBLIC = internKeyword("PUBLIC"),
91         PRESERVE = internKeyword("PRESERVE"),
92         REF = internKeyword("REF"),
93         RELATIVE = internKeyword("RELATIVE"),
94         START = internKeyword("START"),
95         STREAM = internKeyword("STREAM"),
96         SUPERSEDE = internKeyword("SUPERSEDE"),
97         TIME = internKeyword("TIME"),
98         TYPE = internKeyword("TYPE"),
99         UNIX = internKeyword("UNIX"),
100         UNSPECIFIC = internKeyword("UNSPECIFIC"),
101         UP = internKeyword("UP"),
102         UPCASE = internKeyword("UPCASE"),
103         USE = internKeyword("USE"),
104         VERSION = internKeyword("VERSION"),
105         WILD = internKeyword("WILD"),
106         WILD_INFERIORS = internKeyword("WILD-INFERIORS"),
107         WINDOWS = internKeyword("WINDOWS");
108 }
109
Popular Tags