diff options
author | Ludovic Courtès <ludo@gnu.org> | 2010-07-26 16:36:24 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2010-07-26 19:38:52 +0200 |
commit | 1af772303bf4eafb632a95bf4015a7736275e9e7 (patch) | |
tree | 06847e9a5d6da6bc3d020fc634144c0d8c346137 /libguile/vm-engine.c | |
parent | fefd60ba4ba751712c45c95362bbc2f858890678 (diff) | |
download | guile-1af772303bf4eafb632a95bf4015a7736275e9e7.tar.gz |
Import unbound variable reports in the VM.
* libguile/vm-engine.c (VM_NAME)[vm_error_unbound]: Add comment.
* libguile/vm-i-system.c (variable_ref): Attempt provide the name of X
in FINISH_ARGS.
Diffstat (limited to 'libguile/vm-engine.c')
-rw-r--r-- | libguile/vm-engine.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c index 7f4641a07..ff41ce4b6 100644 --- a/libguile/vm-engine.c +++ b/libguile/vm-engine.c @@ -140,6 +140,8 @@ VM_NAME (SCM vm, SCM program, SCM *argv, int nargs) goto vm_error; vm_error_unbound: + /* At this point FINISH_ARGS should be a one-element list containing + the name of the unbound variable. */ err_msg = scm_from_locale_string ("VM: Unbound variable: ~s"); goto vm_error; |