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