diff options
Diffstat (limited to 'src/guile/guiledefs.c')
-rw-r--r-- | src/guile/guiledefs.c | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/src/guile/guiledefs.c b/src/guile/guiledefs.c index 9f52c43..a0e9bd2 100644 --- a/src/guile/guiledefs.c +++ b/src/guile/guiledefs.c @@ -1,3 +1,12 @@ #include <libguile.h> struct scm_unused_struct * scm_undefined = SCM_UNDEFINED; +struct scm_unused_struct * scm_unspecified = SCM_UNSPECIFIED; + +int defs_scm_is_eq(SCM x, SCM y) { + return scm_is_eq(x, y); +} + +void defs_scm_define_string(const char* name, const char* value) { + scm_c_define(name, scm_from_utf8_string(value)); +} |