Number: Date: 19-Aug-84 10':54':48 Submitter: Roach Source: Roach Subject: create expressions sometimes translate wrong Assigned To: Charnley Attn: Status: Superseded In/By: Problem Type: Bug Impact: Serious Difficulty: Frequency: Intermittent Priority: Absolutely System: Programming Environment Subsystem: DWIM Machine: 1108 Disk: Lisp Version: 15-Aug-84 20':06':06 Source Files: Microcode Version: 5124 Memory Size: 3071 File Server: Server Software Version: Disposition: ' ["Masinter" "20-Aug-84 18':41':55" Subject': Assigned% To': Attn': Status':(Open->Superseded)] Description: This is something I don''t quite understand, but since Larry has been working on CLISP recently, I''ll report it just in case. The problem is that CREATE forms seem to occasionally not work. Example (notice the NIL''S)':' ' 3_(DWIMIFY ''(CREATE MLAYOUT UP _ UP EXP _ EXP))' ((LAMBDA ($$1)' (PROG1 (SETQ $$1 NIL)' (FREPLACEFIELD ''(MLAYOUT 8 FULLXPOINTER)' $$1 UP)' (FREPLACEFIELD ''(MLAYOUT 2 POINTER)' $$1 EXP)))' NIL)' (CREATE MLAYOUT UP _ UP EX0<¢04Ô' 4_(EVAL IT)' ARG NOT MLAYOUT' NIL' ' (ERROR broken)' 5':^' ' 5_(DWIMIFY ''(create MLAYOUT UP _ UP EXP _ EXP))' (FREPLACEFIELDVAL' ''(MLAYOUT 6 POINTER)' (FREPLACEFIELDVAL' ''(MLAYOUT 12 POINTER)' (FREPLACEFIELDVAL' ''(MLAYOUT 14 POINTER)' (FREPLACEFIELDVAL' ''(MLAYOUT 16 POINTER)' (FREPLACEFIELDVAL' ''(MLAYOUT 18 POINTER)' (FREPLACEFIELDVAL' ''(MLAYOUT 20 POINTER)' (FREPLACEFIELDVAL' ''(MLAYOUT 22 POINTER)' (FREPLACEFIELDVAL ''(MLAYOUT 24 POINTER)' (FREPLACEFIELDVAL' ''(MLAYOUT 26 POINTER)' (FREPLACEFIELDVAL' ''(MLAYOUT 2 POINTER)' (FREPLACEFIELDVAL ''(MLAYOUT 8 ' FULLXPOINTER)' (NCREATE ''MLAYOUT)' UP)' EXP)' 0)' 0)' 0)' 0)' 0)' 0)' 0)' 0)' 1)' (create MLAYOUT UP _ UP EXP _ EXP)' 6_(DRIBBLE)' ' The result produced by event 3 doesn''t have much chance of working right with it''s NIL''s. I''ve seen the same problem for CREATE expressions involving MENUs. Unfortunately, I can''t repeat this at will. ' Workaround: Test Case: Edit-By: Masinter Edit-Date: 20-Aug-84 18':41':56