Re: trace problem with binhex

[bill@cambridge.apple.com (Bill St. Clair)]

>You said:
>
>>I had this problem myself just last week. The problem happens when the
>>stepper is invoked inside of WITHOUT-INTERRUPTS or during event
>>processing. The enclosed patch should fix the problem. This patch will
>>be part of patch 2 for MCL (patch 1 will be released imminently. Really.)
>>
[...]
>
>I get this when I loaded your patch:
>
>;Loading #P"MicroNet 406:Development :MCL 2.0:step-interrupts-patch.fasl"...
>> Error: Undefined function %SWAPPABLE-FUNCTION-P called with arguments 
>(#<Compiled-function STEP-ASK #xD98656>) .
>> While executing: #<Anonymous Function #xECB82E>
>> Type Command-/ to continue, Command-. to abort.
>> If continued: Retry applying %SWAPPABLE-FUNCTION-P to (#<Compiled-function 
>STEP-ASK #xD98656>).
>See the Restarts... menu item for further choices.

Sorry. I sent the post patch 1 version of the patch. Here's one that
should work in a plain MCL 2.0:


(This file must be converted with BinHex 4.0)

:'R0dCA!YD@jdCA*bGA"dFbe`BA4MD#jQBA0X!%C"8da$3d`b!!!!!!*`!!!!!"I
fr`!!!3!!!!`!!!*Nrb3#!)!!!J!!!!)%&#!H!!!!!!J"6Ud3!#!m!!!!!#2!!!!
!#&K26R@f!!-$#64SC$T$3d`kF'&dBfKPFb"`Eh0d)$)Z-'Bc1R0dCA!YD@jdCA*
bGA"dFbe`BA4MD#jXDA0`$Bi$3d0-'LT-6d&%58j(,8C*6%8Y8dp98N0&,8C*6%8
U""3J(J!!!!!)!8kY%!!J2!!!!!"i"&K26[N!!!!3f`!&!`N$3d0-$3-!!!Y6493
Y8%&$5d&(4338)%J!!!!!#!&1V4!!,3`Y$#!Z!!3JI!!!!!K1V3pS)#i!$#"m!!!
!#%kY$fJL2!!!!!!J$%kY$X`J2!!!!!"f!8lY#kLf!!B&"`F0!`!!%LTA39*1,8P
',9*&4%9'58j&+Jd$!!!C+PG"8NiY58BY8N9%48C*6N8Y5d956N9-+K3J`J!!!!%
L!8kY%!!Y#bCm!!!!#%+Q,3`J,J!%3Hcrp%kY$fJJ,J!-)(`!!!!)6Ud2D%kYr4`
J5dkY&ULj`'GL)%Y1V4DS6Ud@-,R!CL)J5dkY&UK1V4B-,3!J5dkY&UJJ3#D3!#!
H*Qi!)(B"6Zd,U#",6Ud@U#)!F""i#%kj!!!!%#d!)"C1V4B+,3!L,J!%)!a1V4D
')"iQEJ!NGJ&1l3ZSH!"1Z3!!!""JKL!-*Qi!)(B"6Zd,U!!!!!!-3!!*&#S0"!d
$!!!2+P0849!Y3dp068&14&-U$3-!!"-U8&*23d968dP14be&9N919&-U$3i,3dp
068p1,8a*8e!%6%&69!d$!!!149C&6P3Y4%P68%&83dL0!`!!#&0849!Y390,!`!
"rrjU!!!!: