beneroth changed the topic of #picolisp to: PicoLisp language | The scalpel of software development | Channel Log: https://libera.irclog.whitequark.org/picolisp | Check www.picolisp.com for more information
seninha has quit [Quit: Leaving]
seninha has joined #picolisp
aw- has joined #picolisp
aw- has quit [Ping timeout: 246 seconds]
seninha has quit [Ping timeout: 246 seconds]
_whitelogger has joined #picolisp
msavoritias has joined #picolisp
msavoritias has quit [Ping timeout: 246 seconds]
msavoritias has joined #picolisp
<tankf33der> Hi all
<tankf33der> abu[7]
<tankf33der> send me reentrance example of co code
<tankf33der> i will add to tests
<abu[7]> Hi tankf33der!
<abu[7]> I think there is not much to test
<abu[7]> (co 'a (yield T 'a))
<abu[7]> this gave an error
<abu[7]> But it was rather meaningless
<abu[7]> It was needed in old pil64 I think where coroutines were implemented differently
<abu[7]> : (co 'a (msg 1) (yield T 'a) (msg 2) (yield) (msg 3))
<abu[7]> 1
<abu[7]> 2
<abu[7]> : (stack)
<abu[7]> -> ((a . 63) (T . 250) . 64)
<abu[7]> : (yield T 'a)
<abu[7]> -> 3
<abu[7]> : (stack)
<abu[7]> -> ((T . 250) . 64)
<abu[7]> etc.
seninha has joined #picolisp
<tankf33der> Ok
msavoritias has quit [Remote host closed the connection]
msavoritias has joined #picolisp
msavoritias has quit [Remote host closed the connection]
msavoritias has joined #picolisp
teddydd has quit [Remote host closed the connection]
teddydd has joined #picolisp
seninha has quit [Quit: Leaving]
seninha has joined #picolisp
msavoritias has quit [Remote host closed the connection]
aw- has joined #picolisp
aw- has quit [Ping timeout: 255 seconds]