X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fundefineds.h;h=dc2014423d7e703c2fef4ce857be8d7ba0407bc4;hb=b767eae48831153473226b985511c8f7a3ef98c5;hp=9283ed5c5f7086f6baa39863db1db4bcb365cf8f;hpb=80722c917cade18ab933fd313b13c56c6073ae01;p=sbcl.git

diff --git a/src/runtime/undefineds.h b/src/runtime/undefineds.h
index 9283ed5..dc20144 100644
--- a/src/runtime/undefineds.h
+++ b/src/runtime/undefineds.h
@@ -1,5 +1,21 @@
 /*
  * routines that must be linked into the core for Lisp to work
+ *
+ * but note this is only the BSD version, as per the FIXME
+ *
+ * FIXME: It's tedious and error-prone having to edit both this file and
+ * the analogous ldso-stubs.S file when we change the references to
+ * functions, enough so that it would probably be good to rewrite
+ * both files in terms of a shared list of function names.
+ * E.g. the function names could be in shared-function-names.h
+ *   SHARED_FUNCTION(cos)
+ *   SHARED_FUNCTION(sinh)
+ *   SHARED_FUNCTION(strlen)
+ * etc. and the per-OS files could look like
+ *   #define SHARED_FUNCTION(f) ....  
+ *   #include "shared-function-names.h"
+ *   ...then going on to do OS-specific things
+ * "Once and only once."
  */
 
 /*
@@ -12,7 +28,7 @@
  * provided with absolutely no warranty. See the COPYING and CREDITS
  * files for more information.
  */
-
+   
 /* Pick up all the syscalls. */
 F(accept)
 F(access)
@@ -227,6 +243,9 @@ F(sqrt)
 #endif
 F(hypot)
 
+/* string things */
+F(strlen)
+
 /* network support */
 F(gethostbyname)
 F(gethostbyaddr)