mirror of
https://github.com/rabbibotton/clog.git
synced 2025-12-06 10:40:45 -08:00
support for prog1 and prog2
This commit is contained in:
parent
1faedda116
commit
efc3b51ef0
1 changed files with 6 additions and 4 deletions
|
|
@ -115,6 +115,12 @@
|
||||||
(multiple-value-bind :count 2 :sub (nil
|
(multiple-value-bind :count 2 :sub (nil
|
||||||
(:style :list)
|
(:style :list)
|
||||||
nil nil))
|
nil nil))
|
||||||
|
(prog1 :count 1 :sub (nil
|
||||||
|
(:style :list)
|
||||||
|
nil nil))
|
||||||
|
(prog2 :count 2 :sub (nil
|
||||||
|
(:style :list)
|
||||||
|
nil nil))
|
||||||
(prog :style :tag :count 1 :sub (nil
|
(prog :style :tag :count 1 :sub (nil
|
||||||
(:style :list :sub ((:count 0)))
|
(:style :list :sub ((:count 0)))
|
||||||
nil))
|
nil))
|
||||||
|
|
@ -122,10 +128,6 @@
|
||||||
(:style :list :sub ((:count 0)))
|
(:style :list :sub ((:count 0)))
|
||||||
nil))
|
nil))
|
||||||
(progv :count 2)
|
(progv :count 2)
|
||||||
(prog1 :style :tag :count 2 :sub (nil
|
|
||||||
(:style :list :sub ((:count 0)))
|
|
||||||
(:count 0)
|
|
||||||
nil))
|
|
||||||
(quote :count 0 :sub (nil
|
(quote :count 0 :sub (nil
|
||||||
(:style :quote)))
|
(:style :quote)))
|
||||||
(:shadowing-import-from :count 1)
|
(:shadowing-import-from :count 1)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue