diff options
author | Andy Wingo <wingo@pobox.com> | 2012-02-15 23:40:42 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2012-02-15 23:40:42 +0100 |
commit | 2c84211e6317dacddfbda979ea67683e1d8fbdb4 (patch) | |
tree | 1221918f13e63e45510c43e201bd32b435a159fe | |
parent | 2988685d847a46ab1b3adeb4edfe17982a0643fc (diff) | |
download | guile-2c84211e6317dacddfbda979ea67683e1d8fbdb4.tar.gz |
remove deprecated features test
* test-suite/tests/procprop.test ("procedure-arity"): Remove a test of
deprecated features.
-rw-r--r-- | test-suite/tests/procprop.test | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/test-suite/tests/procprop.test b/test-suite/tests/procprop.test index ceb6e562b..9407791f7 100644 --- a/test-suite/tests/procprop.test +++ b/test-suite/tests/procprop.test @@ -72,10 +72,4 @@ (pass-if "opt, eval" (equal? (procedure-minimum-arity (eval '(lambda* (a b #:optional c) #t) (current-module))) - '(2 1 #f))) - - (if (include-deprecated-features) - (pass-if-exception "set-procedure-properties! arity" - '(misc-error . "arity is a read-only property") - (set-procedure-properties! (lambda x x) '((arity . 3)))) - #t)) + '(2 1 #f)))) |