diff options
| author | Andy Wingo <wingo@pobox.com> | 2012-05-02 12:59:11 +0200 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2012-05-07 20:19:09 +0200 |
| commit | 4cec6c221aef72825a05963c95eb633af9a43fcf (patch) | |
| tree | 54791348cf3c9c9332f5d6ab77511d1bc25a9a9b | |
| parent | ff4d3672757fec3c8509e26bc60abf95f9e8f51a (diff) | |
Add a missing SYNC_ALL in variable-ref
* libguile/vm-i-system.c (variable-ref): Add a missing SYNC_ALL.
| -rw-r--r-- | libguile/vm-i-system.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/vm-i-system.c b/libguile/vm-i-system.c index 2399fa065..b8c18f077 100644 --- a/libguile/vm-i-system.c +++ b/libguile/vm-i-system.c @@ -310,6 +310,7 @@ VM_DEFINE_INSTRUCTION (25, variable_ref, "variable-ref", 0, 1, 1) { SCM var_name; + SYNC_ALL (); /* Attempt to provide the variable name in the error message. */ var_name = scm_module_reverse_lookup (scm_current_module (), x); vm_error_unbound (program, scm_is_true (var_name) ? var_name : x); |