Thank you very much Joe.,,,I see what you mean and don't think I've been clear enough. I'll try and put a better example together. It might be because of Lisps "everything returns a value" my constructs aren't compatible. We'll see....back soon.
On 19 January 2017 at 13:13, Joe Bogner <joebog...@gmail.com> wrote: > dean, I would use unless. > > See this control structure below as an alternative to the prog/if > > : (setq Test1 1) > -> 1 > : (case Test1 (1 (unless Test2 (prinl "true")))) > true > -> "true" > > : (setq Test2 "Nope") > -> "Nope" > : (case Test1 (1 (unless Test2 (prinl "true")))) > -> NIL > > > > On Thu, Jan 19, 2017 at 7:55 AM, dean <deangwillia...@gmail.com> wrote: > >> I'd like to do this but am not sure if it's possible >> >> ( case <whatever> >> #========= start of match clause >> (<some match> >> (prog >> (if (<some test is T>) (EXIT THIS MATCH CLAUSE/PROG)) >> (otherwise you'll execute this statement) >> ) >> ) >> #========= end of match clause >> . >> . >> . >> I also wonder if there's a similar... (if (T) (EXIT FUNCTION)) >> > >