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

Reply via email to