diff options
author | Andy Wingo <wingo@pobox.com> | 2010-02-25 00:43:44 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2010-02-25 00:43:51 +0100 |
commit | 35ac785286a527449b9866b4b9adb78a41e545a7 (patch) | |
tree | 9995a16b333a6d95a28771da36a59149246713fa /libguile/vm.c | |
parent | ce4c9a6d00a647892e25d24d703f328afb4be9c3 (diff) | |
download | guile-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.c | 8 |
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 = |