Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-25 13:05:05 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Remove hardcoded tag

Browse source
This commit is contained in:
Justin Ethier 2016-08-23 03:51:36 -04:00
parent 1c0bd864c6
commit 80c10d8eb9
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
scheme/cyclone/libraries.sld
View file

@ -89,7 +89,7 @@
(define (lib:get-all ast tag) (define (lib:get-all ast tag)
(foldr append '() (foldr append '()
(map cdr (map cdr
(filter (lambda (l) (tagged-list? 'import l)) (cddr ast))))) (filter (lambda (l) (tagged-list? tag l)) (cddr ast)))))
(define (lib:raw-exports ast) (define (lib:raw-exports ast)
(lib:result (lib:result