diff options
Diffstat (limited to 'module/ice-9/boot-9.scm')
-rw-r--r-- | module/ice-9/boot-9.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm index 82a0875cf..4a884d871 100644 --- a/module/ice-9/boot-9.scm +++ b/module/ice-9/boot-9.scm @@ -62,7 +62,7 @@ %default-prompt-tag))) (define (call-with-prompt tag thunk handler) - (@prompt tag (thunk) handler)) + ((@@ primitive call-with-prompt) tag thunk handler)) (define (abort-to-prompt tag . args) (abort-to-prompt* tag args)) |