-
Notifications
You must be signed in to change notification settings - Fork 4
/
sneps_config.lisp
211 lines (161 loc) · 8.02 KB
/
sneps_config.lisp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: SNEPS; Base: 10 -*-
;; Copyright (C) 1984--2013
;; Research Foundation of State University of New York
;; Version: $Id: sneps_config.lisp,v
;; This file is part of SNePS.
;; $BEGIN LICENSE$
;;; The contents of this file are subject to the University at
;;; Buffalo Public License Version 1.0 (the "License"); you may
;;; not use this file except in compliance with the License. You
;;; may obtain a copy of the License at
;;; http://www.cse.buffalo. edu/sneps/Downloads/ubpl.pdf.
;;;
;;; Software distributed under the License is distributed on an
;;; "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express
;;; or implied. See the License for the specific language gov
;;; erning rights and limitations under the License.
;;;
;;; The Original Code is SNePS 2.8.
;;;
;;; The Initial Developer of the Original Code is Research Foun
;;; dation of State University of New York, on behalf of Univer
;;; sity at Buffalo.
;;;
;;; Portions created by the Initial Developer are Copyright (C)
;;; 2011 Research Foundation of State University of New York, on
;;; behalf of University at Buffalo. All Rights Reserved.
;; $END LICENSE$
;;; This file is used to configure SNePS. Comments are given before each entry.
;; *sneps-directory* specifies the home directory of SNePS. If running the
;; executable, this is the directory the executable is located in. If running
;; the source version of SNePS, this is the directory that contains
;; load-sneps.lisp. This variable must be specified.
(defvar *sneps-directory*
"/projects/snwiz/Install/Sneps-2.8.0")
;; *use-gui-show* specifies whether to use the GUI version of show or the dot
;; version of show. A value of 't' specifies the GUI, while 'nil' specifies
;; dot. Commenting this out defualts to 't'. Non-windows users will
;; have to edit the Jlinker/jl-config.cl file in the sneps-directory,
;; which asks the user to point jlinker to the java home directory. Java
;; version 1.5 or greater is needed to run the GUI.
(defvar *use-gui-show* t)
;; *jung-directory* specifies the directory containing the jung-1.7.6.jar
;; file, which is part of the JUNG network visualization package. Note:
;; Versions of Jung greater than 1.7.6 will also work.
;; This variable must be specified if *use-gui-show* is 't', unless your
;; system's CLASSPATH environment variable is set up to include the directory
;; already.
(defvar *jung-directory*
(concatenate 'string
*sneps-directory*
"/SnepsGUI/SnepsGUIMods/JungFiles/JUNG/jung-1.7.6"))
;; *colt-directory* specifies the directory containing the colt.jar and
;; concurrent.jar files, which are part of the Cern COLT software package.
;; This variable must be specified if *use-gui-show* is 't', unless your
;; system's CLASSPATH environment variable is set up to include the directory
;; already.
(defvar *colt-directory*
(concatenate 'string
*sneps-directory*
"/SnepsGUI/SnepsGUIMods/JungFiles/Colt/lib"))
;; *xerces-directory* specifies the directory containing the resolver.jar,
;; xercesImpl.jar, xercesSamples.jar, and xml-apis.jar files, which are part
;; of the Xerxes software package.
;; This variable must be specified if *use-gui-show* is 't', unless your
;; system's CLASSPATH environment variable is set up to include the directory
;; already.
(defvar *xerces-directory*
(concatenate 'string
*sneps-directory*
"/SnepsGUI/SnepsGUIMods/JungFiles/Xerces"))
;; *commons-directory* specifies the directory containing the
;; commons-collections-3.2.jar and commons-collections-testframework-3.2.jar
;; files, which are part of the Jakarta Commons Collection software package.
;; Note: Versions greater than 3.2 will most likely work as well.
;; This variable must be specified if *use-gui-show* is 't', unless your
;; system's CLASSPATH environment variable is set up to include the directory
;; already.
(defvar *commons-directory*
(concatenate 'string
*sneps-directory*
"/SnepsGUI/SnepsGUIMods/JungFiles/Commons"))
;; *jimi-directory* specifies the directory containing the jimi-1.0.jar
;; file, which is part of the JIMI software package.
;; Note: Versions greater than 1.0 will most likely work as well.
;; This variable must be specified if *use-gui-show* is 't', unless your
;; system's CLASSPATH environment variable is set up to include the directory
;; already.
(defvar *jimi-directory*
(concatenate 'string
*sneps-directory*
"/SnepsGUI/SnepsGUIMods/Jimi"))
;; *eps-dump-directory* specifies the directory containing the dump.jar
;; file, which is part of the EPSDump software package.
;; This package is not necessary to use the SNePS Show command, and
;; if your system does not have the package, setting this path to 'nil'
;; will prevent the system from expecting the package.
(defvar *eps-dump-directory*
(concatenate 'string
*sneps-directory*
"/SnepsGUI/SnepsGUIMods/EPSComponentDump"))
;; *force-jlinker-config*: On windows paltforms jlinker attempts to configure
;; itself by inspecting the Windows registery. This should be sufficient for
;; running the SNePS GUI Show (*use-gui-show* is set to 't'). If the show
;; command does not work, uncomment the following variable binding and modify
;; the jl-config.cl file in the Jlinker subdirectory.
;;
;; *force-jlinker-config* t
;; *sneps-patch-directory* specifies the directory containing patch files.
;; Must be specified. The below setting should be fine for most users.
;;
(defvar *sneps-patch-directory* *sneps-directory*)
;; *sneps-default-lisp-extension* specifies the file extension for lisp files.
;; Defaults to ".lisp". This is not needed by the SNePS executeable.
;;
;; *sneps-default-lisp-extension* "lisp"
;; *sneps-binary-extension* specifies the compiled extension for lisp files.
;; Defaults based on current lisp implementation running. Not required by
;; SNePS executeable.
;;
;; *sneps-binary-extension* "fasl"
;; *sneps-no-query* specifies whether to query for compilation for files or
;; not. Defaults to 't'. Not needed by the SNEPS executeable.
;;
(defvar *sneps-noquery* t)
;; *sneps-verbose* specifies verbose loading of SNePS files
;; Default to 'nil'
;;
(defvar *sneps-verbose* nil)
;; *sneps-load-old-englex*: If this is T the old englex package is loaded
;; instead of Chris Lusardi's new implementation (for compatibility with old
;; stuff). Not needed by the SNePS executable
;;
(defvar *sneps-load-old-englex* nil)
;; *sneps-user-translations*: List of user supplied logical pathname
;; translations.
;; Changing the value of this variable after this file was loaded
;; will not have any effect."
;;
(defvar *sneps-user-translations* nil)
;; *sneps-use-lpmk*: If non-NIL Mark Kantrowitz's logical pathnames package
;; is used. This should only be non-NIL if there is no native implementation
;; of logical pathnames available in your Lisp. If the value is `:redefine'
;; then additionally standard Lisp functions such as `load', `open',
;; etc., will be redefined with LPMK versions that understand logical
;; pathnames. You can explicitly trigger redefinition by calling
;; `(lp:redefine-standard-functions)'. Redefinition is not necessary to
;; run SNePS, but it gives you the extra convenience of being able to use
;; logical pathnames throughout. Some Lisps lock the Lisp package, in
;; which case you might have to find out how to break that lock before
;; you can use redefinition. Even if there is a native implementation of
;; logical pathnames available it might not work for SNePS. In this case
;; setting this variable to `:redefine' might solve the problem by
;; redefining the native implementation with LPMK. Not needed by the SNePS
;; executeable.
;;
(defvar *sneps-use-lpmk* (not (fboundp 'translate-logical-pathname)))
;; *sneps-debug*: Set 'nil' for compiled code that is faster, but harder to
;; debug. Set 't' for compiled code that is easier to debug, but slower.
;; Not needed by the SNePS executeable
;;
(defvar *sneps-debug* nil)