diff options
author | Ludovic Courtès <ludo@gnu.org> | 2009-11-28 22:52:16 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2009-11-28 22:52:16 +0100 |
commit | 8b22ed7abdc72f7a8f1844af89aa790d27857c7b (patch) | |
tree | 6a45c01126a6e1d067e36455647520ec44c0b85d /libguile/vm-engine.h | |
parent | 5c8cefe591d465af8d8eee9ca6edb98143107a73 (diff) | |
download | guile-8b22ed7abdc72f7a8f1844af89aa790d27857c7b.tar.gz |
Remove remaining uses of discouraged constructs, really.
* libguile/throw.c, libguile/vm-engine.h, libguile/vm-i-system.c,
libguile/vm.c: Replace uses of discouraged constructs by their
current counterparts.
Diffstat (limited to 'libguile/vm-engine.h')
-rw-r--r-- | libguile/vm-engine.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/vm-engine.h b/libguile/vm-engine.h index d69328944..ebe40b2d1 100644 --- a/libguile/vm-engine.h +++ b/libguile/vm-engine.h @@ -208,7 +208,7 @@ #if VM_USE_HOOKS #define RUN_HOOK(h) \ { \ - if (SCM_UNLIKELY (!SCM_FALSEP (vp->hooks[h])))\ + if (SCM_UNLIKELY (scm_is_true (vp->hooks[h])))\ { \ SYNC_REGISTER (); \ vm_dispatch_hook (vp, vp->hooks[h], hook_args); \ |