diff options
Diffstat (limited to 'libguile/vm-i-system.c')
-rw-r--r-- | libguile/vm-i-system.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/vm-i-system.c b/libguile/vm-i-system.c index 15e339492..c72b84d0e 100644 --- a/libguile/vm-i-system.c +++ b/libguile/vm-i-system.c @@ -1508,7 +1508,7 @@ VM_DEFINE_INSTRUCTION (85, wind, "wind", 0, 2, 0) NEXT; } -VM_DEFINE_INSTRUCTION (86, throw, "throw", 1, -1, -1) +VM_DEFINE_INSTRUCTION (86, abort, "abort", 1, -1, -1) { unsigned n = FETCH (); SCM k; @@ -1517,8 +1517,8 @@ VM_DEFINE_INSTRUCTION (86, throw, "throw", 1, -1, -1) POP (args); POP (k); SYNC_REGISTER (); - vm_throw (vm, k, args); - /* vm_throw should not return */ + vm_abort (vm, k, args); + /* vm_abort should not return */ abort (); } |