summaryrefslogtreecommitdiff
path: root/fig-utils/csrc
diff options
context:
space:
mode:
authorLLLL Colonq <llll@colonq>2025-12-05 15:00:31 -0500
committerLLLL Colonq <llll@colonq>2025-12-05 15:00:31 -0500
commit5c8a8efeddd53fb6bb824c5074c4e4cb9393e9fb (patch)
tree8a9e5f4f59363f95bfa16152c529d3f13358837b /fig-utils/csrc
parent2a21b457d71e8cace0db0e3b4913234d25f38aec (diff)
Update
Diffstat (limited to 'fig-utils/csrc')
-rw-r--r--fig-utils/csrc/fig.c18
1 files changed, 18 insertions, 0 deletions
diff --git a/fig-utils/csrc/fig.c b/fig-utils/csrc/fig.c
index 0df8bae..9e3b4b8 100644
--- a/fig-utils/csrc/fig.c
+++ b/fig-utils/csrc/fig.c
@@ -39,6 +39,24 @@ SCM default_bindings() {
scm_from_utf8_symbol("interaction-environment")),
bindings
);
+ bindings = scm_cons(
+ scm_list_2(
+ scm_list_1(scm_from_utf8_symbol("guile")),
+ scm_from_utf8_symbol("read")),
+ bindings
+ );
+ bindings = scm_cons(
+ scm_list_2(
+ scm_list_1(scm_from_utf8_symbol("guile")),
+ scm_from_utf8_symbol("open-input-string")),
+ bindings
+ );
+ bindings = scm_cons(
+ scm_list_2(
+ scm_list_2(scm_from_utf8_symbol("ice-9"), scm_from_utf8_symbol("format")),
+ scm_from_utf8_symbol("format")),
+ bindings
+ );
return bindings;
}