* _scm.h (min, max): Added.
authorMikael Djurfeldt <djurfeldt@nada.kth.se>
Mon, 14 Oct 1996 03:24:01 +0000 (03:24 +0000)
committerMikael Djurfeldt <djurfeldt@nada.kth.se>
Mon, 14 Oct 1996 03:24:01 +0000 (03:24 +0000)
* async.c: Moved `min' macro to _scm.h.

libguile/_scm.h

index d6003cd..350246a 100644 (file)
@@ -46,6 +46,8 @@
 
 #include "__scm.h"
 
+/* This file is only visible to the libguile sources */
+
 /* Include headers for those files central to the implementation.  The
    rest should be explicitly #included in the C files themselves.  */
 #include "error.h"             /* Everyone signals errors.  */
 %%%    C_NAME = scm_permanent_object (scm_intern0 (SCHEME_NAME)); SCM_SETCDR (C_NAME, scm_long2num (VALUE))
 #endif
 
+#define min(A,B) ((A) <= (B) ? (A) : (B))
+#define max(A,B) ((A) >= (B) ? (A) : (B))
+
 #endif  /* _SCMH */