We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 25b2b3e commit e4f1992Copy full SHA for e4f1992
tests/basic/procedure-arity.rkt
@@ -14,3 +14,7 @@
14
; (displayln (procedure-arity foo))
15
; (displayln (procedure-arity bar))
16
; (displayln (procedure-arity baz))
17
+
18
+(displayln (equal? (procedure-arity foo) (arity-at-least 2)))
19
+(displayln (equal? (procedure-arity bar) (arity-at-least 0)))
20
+(displayln (equal? (procedure-arity baz) 3))
0 commit comments