networks: Fix list-syntactic-interactions.

This commit is contained in:
Sergiu Ivanov 2020-11-23 23:09:23 +01:00
parent 0a4035d9f7
commit fbd6ded717

View file

@ -345,7 +345,7 @@
(define (list-syntactic-interactions nf x) (define (list-syntactic-interactions nf x)
(set-intersect (set-intersect
(extract-symbols (hash-ref (network-form-forms nf) x)) (extract-symbols (hash-ref (network-form-forms nf) x))
(hash-keys nf))) (hash-keys (network-form-forms nf))))
(module+ test (module+ test
(test-case "list-syntactic-interactions" (test-case "list-syntactic-interactions"