~bouncepaw/agidel-syntrans

d5904872a08b43c1f63f16e78f65d39f7ec44abc — Timur Ismagilov 5 years ago 7a09c72
Fix signature searching
1 files changed, 1 insertions(+), 1 deletions(-)

M prepare.scm
M prepare.scm => prepare.scm +1 -1
@@ 22,7 22,7 @@
    ((eq? q/e 'e) aeval)))

 (define (make-parser name-of-λ)
   (define signature (hash-table-ref signatures name-of-λ))
   (define signature (hash-table-ref signatures (symbol-append '/ name-of-λ)))

   (define (rest-parser . args)
     (define λ (q/e->λ signature))