[its-hackers] Possible error in Muddle 56 closing of a disk channel

rrs0 at earthlink.net rrs0 at earthlink.net
Sat Feb 27 06:09:24 CET 2021


Hi Lars and all others/,

I think that I've found an error in muddle 56's closing of user defined disk channels.
Below is an example of the problem. I was trying to define a function to PPRINT to
A disk file, you could easily save bits and pieces of code you were working on. Screen 
Copying the code segment and coping it to TECO is kind of a kluge. 

.......................................................................................................................................
;"MUDDLE 56 error??"

<SET FOUT <OPEN "PRINT" "DSK:RRS;FOOBAR >">>$                            
#CHANNEL [3 "PRINT" "FOOBAR" ">" "DSK" "RRS" "FOOBAR" "3" "DSK" "RRS" 227
23748404134 80 0 0 0 0 10                                                
""                                                                       
]                                                                        
"THIS IS A TEST OF FILE OUTPUT"OUTPUT" .FOUT>$                           
                                                                         
<PRINC "THIS IS A TEST OF FILE OUTPUT" .FOUT>$                           
"THIS IS A TEST OF FILE OUTPUT"                                          
                                                                         
.FOUT$                                                                   
#CHANNEL [3 "PRINT" "FOOBAR" ">" "DSK" "RRS" "FOOBAR" "3" "DSK" "RRS" 227
23748404134 80 61 0 0 63 10                                              
""                                                                       
]                                                                        
<CLOSE .FOUT>$                                                           
#CHANNEL [0 "PRINT" "FOOBAR" ">" "DSK" "RRS"                             
MPV; 727106>>ILDB 1,(13)   1/   -50737   7520/   TSCA 17,424163(17)      


$g restarts muddle at
MUDDLE 56 IN OPERATION.        
LISTENING-AT-LEVEL 1 PROCESS 1 

Everything you FLOADed or DEFINEd is still memory.

$p repeats the same crash
MPV; 727106>>ILDB 1,(13)   1/   -50737   7520/   TSCA 17,424163(17)  

2   FOOBAR 3      0 ! 2/27/2021 05:08:10  
Is empty




More information about the its-hackers mailing list