[<<][libprim][>>][..]
Sat Oct 31 16:22:27 EDT 2015

bug

old:

tom@pt:~/libprim/build$ pf/pf.elf
<,['{{i . {compile . {run}}} . {{compose . {{>lcode} . {dip . {>lcode . {lcompose}}}}} . {{pa . {{abstract} . {dip . {>lcode . {lcompose}}}}} . {{see . {find \
. {post}}} . {{unrun! . {{quote . {()}} . {lunrun-and-compose!}}} . {{prompt . {reset}} . {{compile . {>nl . {nl-compile}}} . {{+ . {add}} . {{list->stream . \
{{{{cons} . {shift}} . {each . {{quote . {()}}}}} . {reset}}}}}}}}}}}} definitions '"libprim/PF" display cr repl]>
<,['{{i . {compile . {run}}} . {{compose . {{>lcode} . {dip . {>lcode . {lcompose}}}}} . {{pa . {{abstract} . {dip . {>lcode . {lcompose}}}}} . {{see . {find \
. {post}}} . {{unrun! . {{quote . {()}} . {lunrun-and-compose!}}} . {{prompt . {reset}} . {{compile . {>nl . {nl-compile}}} . {{+ . {add}} . {{list->stream . \
{{{{cons} . {shift}} . {each . {{quote . {()}}}}} . {reset}}}}}}}}}}}}] . <,[definitions '"libprim/PF" display cr repl]>>
<,[definitions '"libprim/PF" display cr repl]>
<,[>nl nl-definitions] . <,['"libprim/PF" display cr repl]>>
<,[>nl] . <,[nl-definitions] . <,['"libprim/PF" display cr repl]>>>
<,[nl-definitions] . <,['"libprim/PF" display cr repl]>>
<,['"libprim/PF" display cr repl]>
<,['"libprim/PF"] . <,[display cr repl]>>
<,[display cr repl]>
<,[display] . <,[cr repl]>>
libprim/PF<,[cr repl]>
<,[cr] . <,[rep repl]>>

<,[rep repl]>
<,['"> " display read interpret] . <,[rep repl]>>
<,['"> "] . <,[display read interpret] . <,[rep repl]>>>
<,[display read interpret] . <,[rep repl]>>
<,[display] . <,[read interpret] . <,[rep repl]>>>
> <,[read interpret] . <,[rep repl]>>
<,[read] . <,[interpret] . <,[rep repl]>>>


new:

tom@tp:~/libprim/build/pf$ ./pf.elf 
<,[['quote [['i 'compile 'run] ['compose ['>lcode] 'dip '>lcode 'lcompose] ['pa ['abstract] 'dip '>lcode 'lcompose] ['see 'find 'post] ['unrun! ['quote [nop]] 'lunrun-and-compose!] ['prompt 'reset] ['compile '>nl 'nl-compile] ['+ 'add] ['list->stream [[['cons] 'shift] 'each ['quote [nop]]] 'reset]]] 'definitions '"libprim/PF" 'display 'cr 'repl]>
<,[['quote [['i 'compile 'run] ['compose ['>lcode] 'dip '>lcode 'lcompose] ['pa ['abstract] 'dip '>lcode 'lcompose] ['see 'find 'post] ['unrun! ['quote [nop]] 'lunrun-and-compose!] ['prompt 'reset] ['compile '>nl 'nl-compile] ['+ 'add] ['list->stream [[['cons] 'shift] 'each ['quote [nop]]] 'reset]]]] . <,['definitions '"libprim/PF" 'display 'cr 'repl]>>
<,['definitions '"libprim/PF" 'display 'cr 'repl]>
<,['definitions] . <,['"libprim/PF" 'display 'cr 'repl]>>
<,['"libprim/PF" 'display 'cr 'repl]>
<,['"libprim/PF"] . <,['display 'cr 'repl]>>
<,['display 'cr 'repl]>
<,['display] . <,['cr 'repl]>>
<,['cr 'repl]>
<,['cr] . <,['repl]>>
<,['repl]>
()
!lnext
()
!lnext
tom@tp:~/libprim/build/pf$ 


new:
px_compile_program: ((#<lin:#fin quote> . (((#<lin:#fin i> . 

old:
px_compile_program: ((quote . (((i . (compile . (run)))



So there's something wrong with the lin/fin thing...
I don't understand it at this point, so let's see where it breaks.

Maybe these "lin" boxes are no longer necessary? Look into this.

The problem causing the current bug is that symbols are now handled as
RC boxes.



[Reply][About]
[<<][libprim][>>][..]