This is the UNLISP file for LOCAL::MAX$DISK:[SHAREM]FEXPR.MC;18.

Translating: DEF
WARNING-> LAMBDA([X],IF ATOM(X) THEN (QINFO:CONS(FALSE,QINFO),VARS:CONS(X,VARS)) ELSE (IF PART(X,0) = "'" THEN (QINFO:CONS(TRUE,QINFO),VARS:CONS(PART(X,1),VARS)) ELSE (IF PART(X,0) = "[" THEN (LEXPR:TRUE,X:PART(X,1),IF ATOM(X) THEN (QINFO:CONS(FALSE,QINFO),VARS:CONS(X,VARS)) ELSE (IF PART(X,0) = "'" THEN (QINFO:CONS(TRUE,QINFO),VARS:CONS(PART(X,1),VARS)) ELSE ERROR("ILLEGAL FORM IN BVL -DEF"))) ELSE ERROR("ILLEGAL FORM IN BVL -DEF"))))
has caused a call to the evaluator to be output,
due to lack of information. Code will not work compiled.
This form:LAMBDA([X],
       IF ATOM(X) THEN (QINFO:CONS(FALSE,QINFO),VARS:CONS(X,VARS))
	   ELSE (IF PART(X,0) = "'"
		     THEN (QINFO:CONS(TRUE,QINFO),VARS:CONS(PART(X,1),VARS))
		     ELSE (IF PART(X,0) = "["
			       THEN (LEXPR:TRUE,X:PART(X,1),
				     IF ATOM(X)
					 THEN (QINFO:CONS(FALSE,QINFO),
					       VARS:CONS(X,VARS))
					 ELSE (IF PART(X,0) = "'"
						   THEN (
						   QINFO:CONS(TRUE,QINFO),
						   VARS:CONS(PART(X,1),VARS))
						   ELSE ERROR(
						   "ILLEGAL FORM IN BVL -DEF")))
			       ELSE ERROR("ILLEGAL FORM IN BVL -DEF"))))
has side effects on these variables:[LEXPR,QINFO,VARS]
which cannot be supported in the translated code.
(at this time)
Warning-> GENLIST is an undefined global variable.
/* Variable settings were */

TRANSCOMPILE:TRUE;
TR_SEMICOMPILE:FALSE;
TR_WARN_UNDECLARED:COMPILE;
TR_WARN_MEVAL:COMPFILE;
TR_WARN_FEXPR:COMPFILE;
TR_WARN_MODE:ALL;
TR_WARN_UNDEFINED_VARIABLE:ALL;
TR_FUNCTION_CALL_DEFAULT:GENERAL;
TR_ARRAY_AS_REF:TRUE;
TR_NUMER:FALSE;
DEFINE_VARIABLE:FALSE;