Copy with empty declarations again
This commit is contained in:
parent
4edcffdc3a
commit
000a898778
|
@ -81,9 +81,10 @@
|
|||
(read-rest-of-line)
|
||||
#f))
|
||||
(first-form (read-form))
|
||||
(declarations (and (list? first-form)
|
||||
(eqv? 'declare-file (car first-form))
|
||||
(cdr first-form))))
|
||||
(declarations (or (and (list? first-form)
|
||||
(eqv? 'declare-file (car first-form))
|
||||
(cdr first-form))
|
||||
'())))
|
||||
(if shebang
|
||||
(cons (list 'shebang shebang) declarations)
|
||||
declarations))))
|
||||
|
|
Loading…
Reference in New Issue