Diff of /src/c/symbols_list.h [ee997b] .. [d57393] Maximize Restore

  Switch to side-by-side view

--- a/src/c/symbols_list.h
+++ b/src/c/symbols_list.h
@@ -571,8 +571,8 @@
 {"LENGTH", CL_ORDINARY, cl_length, 1, OBJNULL},
 {"LET", CL_FORM, NULL, -1, OBJNULL},
 {"LET*", CL_FORM, NULL, -1, OBJNULL},
-{"LISP-IMPLEMENTATION-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
-{"LISP-IMPLEMENTATION-VERSION", CL_ORDINARY, NULL, -1, OBJNULL},
+{"LISP-IMPLEMENTATION-TYPE", CL_ORDINARY, ECL_NAME(cl_lisp_implementation_type), 0, OBJNULL},
+{"LISP-IMPLEMENTATION-VERSION", CL_ORDINARY, ECL_NAME(cl_lisp_implementation_version), 0, OBJNULL},
 {"LIST", CL_ORDINARY, cl_list, -1, OBJNULL},
 {"LIST*", CL_ORDINARY, cl_listX, -1, OBJNULL},
 {"LIST-ALL-PACKAGES", CL_ORDINARY, cl_list_all_packages, 0, OBJNULL},
@@ -603,13 +603,13 @@
 {"LONG-FLOAT", CL_ORDINARY, NULL, -1, OBJNULL},
 {"LONG-FLOAT-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
 {"LONG-FLOAT-NEGATIVE-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
-{"LONG-SITE-NAME", CL_ORDINARY, NULL, -1, OBJNULL},
+{"LONG-SITE-NAME", CL_ORDINARY, ECL_NAME(cl_long_site_name), 0, OBJNULL},
 {"LOOP", CL_ORDINARY, NULL, -1, OBJNULL},
 {"LOOP-FINISH", CL_ORDINARY, NULL, -1, OBJNULL},
 {"LOWER-CASE-P", CL_ORDINARY, cl_lower_case_p, 1, OBJNULL},
-{"MACHINE-INSTANCE", CL_ORDINARY, NULL, -1, OBJNULL},
-{"MACHINE-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
-{"MACHINE-VERSION", CL_ORDINARY, NULL, -1, OBJNULL},
+{"MACHINE-INSTANCE", CL_ORDINARY, ECL_NAME(cl_machine_instance), 0, OBJNULL},
+{"MACHINE-TYPE", CL_ORDINARY, ECL_NAME(cl_machine_type), 0, OBJNULL},
+{"MACHINE-VERSION", CL_ORDINARY, ECL_NAME(cl_machine_version), 0, OBJNULL},
 {"MACRO-FUNCTION", CL_ORDINARY, cl_macro_function, -1, OBJNULL},
 {"MACROEXPAND", CL_ORDINARY, cl_macroexpand, -1, OBJNULL},
 {"MACROEXPAND-1", CL_ORDINARY, cl_macroexpand_1, -1, OBJNULL},
@@ -851,7 +851,7 @@
 {"SHORT-FLOAT", CL_ORDINARY, NULL, -1, OBJNULL},
 {"SHORT-FLOAT-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
 {"SHORT-FLOAT-NEGATIVE-EPSILON", CL_CONSTANT, NULL, -1, OBJNULL},
-{"SHORT-SITE-NAME", CL_ORDINARY, NULL, -1, OBJNULL},
+{"SHORT-SITE-NAME", CL_ORDINARY, ECL_NAME(cl_short_site_name), 0, OBJNULL},
 {"SIGNAL", CL_ORDINARY, NULL, -1, OBJNULL},
 {"SIGNED-BYTE", CL_ORDINARY, NULL, -1, OBJNULL},
 {"SIGNUM", CL_ORDINARY, ECL_NAME(cl_signum), 1, OBJNULL},
@@ -876,8 +876,8 @@
 {"SINH", CL_ORDINARY, cl_sinh, 1, OBJNULL},
 {"SIXTH", CL_ORDINARY, cl_sixth, 1, OBJNULL},
 {"SLEEP", CL_ORDINARY, cl_sleep, 1, OBJNULL},
-{"SOFTWARE-TYPE", CL_ORDINARY, NULL, -1, OBJNULL},
-{"SOFTWARE-VERSION", CL_ORDINARY, NULL, -1, OBJNULL},
+{"SOFTWARE-TYPE", CL_ORDINARY, ECL_NAME(cl_software_type), 0, OBJNULL},
+{"SOFTWARE-VERSION", CL_ORDINARY, ECL_NAME(cl_software_version), 0, OBJNULL},
 {"SOME", CL_ORDINARY, ECL_NAME(cl_some), -1, OBJNULL},
 {"SORT", CL_ORDINARY, ECL_NAME(cl_sort), -1, OBJNULL},
 {"SPACE", CL_ORDINARY, NULL, -1, OBJNULL},
@@ -1991,7 +1991,7 @@
 {EXT_ "OPTIONAL-ANNOTATION", EXT_ORDINARY, NULL, -1, ECL_NIL},
 {EXT_ "LOCATION", EXT_ORDINARY, NULL, -1, ECL_NIL},
 
-{EXT_ "LISP-IMPLEMENTATION-VCS-ID", EXT_ORDINARY, NULL, -1, ECL_NIL},
+{EXT_ "LISP-IMPLEMENTATION-VCS-ID", EXT_ORDINARY, ECL_NAME(si_lisp_implementation_vcs_id), 0, ECL_NIL},
 
 {SYS_ "SIGNAL-SERVICING", SI_ORDINARY, NULL, -1, ECL_NIL},