Try to detect when people are using one version of libguile and a
[bpt/guile.git] / libguile / version.c
index 25e3d0d..e703820 100644 (file)
@@ -41,6 +41,7 @@
 \f
 
 #include "_scm.h"
+#include "versiondat.h"
 
 #include "version.h"
 \f
@@ -75,6 +76,16 @@ scm_version ()
   return scm_makfrom0str (GUILE_VERSION);
 }
 
+/* Return a Scheme string containing Guile's configuration stamp.  */
+
+SCM_PROC(s_libguile_config_stamp, "libguile-config-stamp", 0, 0, 0, scm_libguile_config_stamp);
+
+SCM
+scm_libguile_config_stamp ()
+{
+  return scm_makfrom0str (GUILE_STAMP);
+}
+
 \f