Commits

Anonymous committed 7b01c41

Already defined in fredenv.lisp -- causes an error during compilation due to the constant already being defined.

Comments (0)

Files changed (1)

Build Part 1/Patches to base MCL/MCLmetapoint.lisp

 
 (in-package :ccl)
 
-(eval-when (load compile)
-  (defconstant symbol-specials #.(let ((str (make-string 16)))
-                                      (set-schar str 0 #\Space)
-                                      (set-schar str 1 #\()
-                                      (set-schar str 2 #\))
-                                      (set-schar str 3 #\^M)
-                                      (set-schar str 4 #\')
-                                      (set-schar str 5 #\`)
-                                      (set-schar str 6 #\,)
-                                      (set-schar str 7 #\")
-                                      (set-schar str 8 #\;)
-                                      (set-schar str 9 #\\)
-                                      (set-schar str 10 #\|)
-                                      (set-schar str 11 #\^I)
-                                      (set-schar str 12 #\^L)
-                                      (set-schar str 13 #\^@)
-                                      (set-schar str 14 #\^J)
-                                      (set-schar str 15 (%code-char #xCA))
-                                      str)))
-
 (defun sk8-search-method-classes (w classes qualifiers pos end)
   (let () ; eventually do all classes
     (when (and (setq pos (buffer-skip-fwd-wsp&comments w pos end))
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.