mirror of
https://github.com/justinethier/cyclone.git
synced 2025-05-23 20:15:05 +02:00
Issue #113 - Check for duplicate lambda parameters
This commit is contained in:
parent
8cfb7720eb
commit
8e3aedbb11
1 changed files with 4 additions and 0 deletions
|
@ -1075,6 +1075,10 @@
|
|||
(define-vars (find-defined-vars body))
|
||||
(defines-a-lookup (make-a-lookup define-vars))
|
||||
)
|
||||
;; This is a convenient place to check for duplicate lambda args
|
||||
(if (not (equal? (delete-duplicates args) args))
|
||||
(error "duplicate lambda parameter(s)" args))
|
||||
;; New lambda code
|
||||
`(lambda
|
||||
,(list->lambda-formals
|
||||
(map (lambda (p) (cdr p)) a-lookup)
|
||||
|
|
Loading…
Add table
Reference in a new issue