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))
>

Reply via email to