From efc3b51ef0242c3ee0bceb3ebde46f1e5bf3a219 Mon Sep 17 00:00:00 2001 From: David Botton Date: Wed, 17 Apr 2024 13:05:08 -0400 Subject: [PATCH] support for prog1 and prog2 --- tools/preferences-tabs.lisp | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/tools/preferences-tabs.lisp b/tools/preferences-tabs.lisp index 50b71d9..674d990 100644 --- a/tools/preferences-tabs.lisp +++ b/tools/preferences-tabs.lisp @@ -115,6 +115,12 @@ (multiple-value-bind :count 2 :sub (nil (:style :list) 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 (:style :list :sub ((:count 0))) nil)) @@ -122,10 +128,6 @@ (:style :list :sub ((:count 0))) nil)) (progv :count 2) - (prog1 :style :tag :count 2 :sub (nil - (:style :list :sub ((:count 0))) - (:count 0) - nil)) (quote :count 0 :sub (nil (:style :quote))) (:shadowing-import-from :count 1)