[net.lang.lisp] Bug in xlisp xequal function

mwm@ea.UUCP (10/13/84)

Notes don't seem to be getting this far, so I'm not sure if this is
appreciated, but here goes anyway:

After adding LET to xlisp, I turned up a bug in the xequal function (the
internal version of EQUAL). If xequal gets called with one nil argument, it
can drop core. I don't know how it worked before, and would like
corraboration from others. The fix is to put in explicit tests for nil in
xequal around line 250 in the file xllist.c, as so:

    if (xeq(arg1,arg2)
	return(TRUE);
    else
	<...>
---
    if (xeq(arg1,arg2)
	return(TRUE);
    if (arg1 == (struct node *) NULL) return arg2 == (struct node *) NULL ;
    if (arg2 == (struct node *) NULL) return FALSE ;
	<...>

Am I lost? Comments by mail, please, due to the notes problem.

	<mike