mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-29 22:40:34 +02:00
Code Activity

remove deprecated features test

Browse source 
* test-suite/tests/procprop.test ("procedure-arity"): Remove a test of
  deprecated features.
This commit is contained in:
Andy Wingo 2012-02-15 23:40:42 +01:00
parent 2988685d84
commit 2c84211e63
1 changed files with 1 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

8
test-suite/tests/procprop.test
View file

@ -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))))