summaryrefslogtreecommitdiff
path: root/libguile/cpp_cnvt.awk
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/cpp_cnvt.awk')
-rw-r--r--libguile/cpp_cnvt.awk7
1 files changed, 7 insertions, 0 deletions
diff --git a/libguile/cpp_cnvt.awk b/libguile/cpp_cnvt.awk
new file mode 100644
index 000000000..a01ba52a8
--- /dev/null
+++ b/libguile/cpp_cnvt.awk
@@ -0,0 +1,7 @@
+# Converts a list of symbols into C expressions which define the symbols
+# in Guile.
+{
+print "#ifdef " $0;
+print "scm_sysintern (\""$0"\", SCM_MAKINUM ("$0"));";
+print "#endif"
+}