Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10 Apollo 1/28/85; site apollo.uucp
Path: utzoo!watmath!clyde!bonnie!akgua!whuxlm!harpo!decvax!wanginst!apollo!rps
From: rps@apollo.uucp (Robert Stanzel)
Newsgroups: net.sources.bugs
Subject: Minor bug in XLISP 1.2
Message-ID: <2493fc1d.1e08@apollo.uucp>
Date: Mon, 4-Feb-85 17:41:49 EST
Article-I.D.: apollo.2493fc1d.1e08
Posted: Mon Feb  4 17:41:49 1985
Date-Received: Sat, 9-Feb-85 06:06:14 EST
Organization: Apollo Computer, Chelmsford, Mass.
Lines: 13

The evaluation of (gensym ()) will crash XLISP.  Fix diff follows:

XLBFUN.C
210c210
< 	x = xlarg(&args);
---
> 	if (NULL != (x = xlarg(&args))) 
-- 

"Satellites are out tonight"

Rob Stanzel             ARPA:  Rps%MIT-OZ@MIT-MC
Apollo Computer         UUCP:  ...{yale,uw-beaver,decvax!wanginst}!apollo!rps