mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-09 13:30:26 +02:00
remove deprecated features test
* test-suite/tests/procprop.test ("procedure-arity"): Remove a test of deprecated features.
This commit is contained in:
parent
2988685d84
commit
2c84211e63
1 changed files with 1 additions and 7 deletions
|
@ -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))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue