summaryrefslogtreecommitdiff
path: root/libguile/vm.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2010-02-25 00:43:44 +0100
committerAndy Wingo <wingo@pobox.com>2010-02-25 00:43:51 +0100
commit35ac785286a527449b9866b4b9adb78a41e545a7 (patch)
tree9995a16b333a6d95a28771da36a59149246713fa /libguile/vm.c
parentce4c9a6d00a647892e25d24d703f328afb4be9c3 (diff)
downloadguile-35ac785286a527449b9866b4b9adb78a41e545a7.tar.gz
fix embarrassing bug
* libguile/vm.c: Fix embarrassing error regarding the symbolitude of vm-error and friends.
Diffstat (limited to 'libguile/vm.c')
-rw-r--r--libguile/vm.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/libguile/vm.c b/libguile/vm.c
index f53aaf5ab..85e0e7ada 100644
--- a/libguile/vm.c
+++ b/libguile/vm.c
@@ -752,10 +752,10 @@ scm_bootstrap_vm (void)
scm_c_register_extension ("libguile", "scm_init_vm",
(scm_t_extension_init_func)scm_init_vm, NULL);
- sym_vm_run = scm_from_locale_string ("vm-run");
- sym_vm_error = scm_from_locale_string ("vm-error");
- sym_keyword_argument_error = scm_from_locale_string ("keyword-argument-error");
- sym_debug = scm_from_locale_string ("debug");
+ sym_vm_run = scm_from_locale_symbol ("vm-run");
+ sym_vm_error = scm_from_locale_symbol ("vm-error");
+ sym_keyword_argument_error = scm_from_locale_symbol ("keyword-argument-error");
+ sym_debug = scm_from_locale_symbol ("debug");
#ifdef VM_ENABLE_PRECISE_STACK_GC_SCAN
vm_stack_gc_kind =