From 66d085713f741abeab96b498433d812fa66a67dc Mon Sep 17 00:00:00 2001 From: Abdulaziz Ghuloum Date: Sat, 19 Apr 2008 16:55:40 -0400 Subject: [PATCH] Made interrupted conditions &serious so that you can interrupt R6RS scripts. --- scheme/ikarus.conditions.ss | 2 +- scheme/last-revision | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/scheme/ikarus.conditions.ss b/scheme/ikarus.conditions.ss index 257ee8a..730ed06 100644 --- a/scheme/ikarus.conditions.ss +++ b/scheme/ikarus.conditions.ss @@ -341,7 +341,7 @@ make-no-nans-violation no-nans-violation?) ;;; ikarus-specific conditions - (define-condition-type &interrupted &condition + (define-condition-type &interrupted &serious make-interrupted-condition interrupted-condition?) (define-condition-type &i/o-would-block &condition diff --git a/scheme/last-revision b/scheme/last-revision index f7df7fd..31d5cbb 100644 --- a/scheme/last-revision +++ b/scheme/last-revision @@ -1 +1 @@ -1449 +1450