parent
817bfd7517
commit
a045d54071
|
@ -776,7 +776,7 @@
|
||||||
(values (cons pr1 pr)
|
(values (cons pr1 pr)
|
||||||
(cons g1 g)
|
(cons g1 g)
|
||||||
(cons m1 m)
|
(cons m1 m)
|
||||||
(append bs1 bs))))
|
(append bs bs1))))
|
||||||
(if (identifier? #'ctor)
|
(if (identifier? #'ctor)
|
||||||
(values (cons #'ctor (reverse pr))
|
(values (cons #'ctor (reverse pr))
|
||||||
(cons #'ctor (reverse g))
|
(cons #'ctor (reverse g))
|
||||||
|
|
Loading…
Reference in New Issue