Work at SourceForge, help us to make it a better place! We have an immediate need for a Support Technician in our San Francisco or Denver office.

Close

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

  Switch to side-by-side view

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