ChanServ changed the topic of #picolisp to: PicoLisp language | Channel Log: https://irclog.whitequark.org/picolisp/ | Picolisp latest found at http://www.software-lab.de/down.html | check also http://www.picolisp.com for more information
shpx has joined #picolisp
jibanes has quit [Ping timeout: 248 seconds]
jibanes has joined #picolisp
cilz has quit [Ping timeout: 260 seconds]
jibanes has quit [Ping timeout: 246 seconds]
jibanes has joined #picolisp
shpx has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
shpx has joined #picolisp
shpx has quit [Client Quit]
aw- has joined #picolisp
shpx has joined #picolisp
libertas has quit [Ping timeout: 276 seconds]
libertas has joined #picolisp
cilz has joined #picolisp
<cilz> good morning guys
<Regenaxer> Hi cilz!
<aw-> hi cilz, Regenaxer
<Regenaxer> Hi aw-
<cilz> Hello guys
rob_w has joined #picolisp
mtsd has joined #picolisp
<beneroth> Good morning all :D
<beneroth> so cilz is already working on grokking the core knot, eh? :D
<beneroth> meditating over the term "repl" helps a lot at this stage :)
<mtsd> good morning beneroth
<beneroth> Good morning mtsd :)
<Regenaxer> He beneroth, mtsd
<beneroth> Hi Regenaxer *hug*
<mtsd> Hello Regenaxer
<Regenaxer> :)
shpx has quit [Quit: My MacBook has gone to sleep. ZZZzzz…]
<tankf33der> playing with dirname and basename
<tankf33der> (basename "/\") (dirname "/\")
<tankf33der> both hangs
<tankf33der> its ok.
<tankf33der> :)
<Regenaxer> oh
<Regenaxer> yes, ok
<Regenaxer> It is the reader waiting
<Regenaxer> String is not terminated
<cess11> T
<cess11> I would assume "/\"" to work.
<Regenaxer> right
<beneroth> its neither basename nor dirname hanging to be exact, right?
<Regenaxer> yep
<aw-> how about (basename (char 94))
inara` has quit [Quit: Leaving]
alexshendi has quit [Read error: Connection reset by peer]
inara has joined #picolisp
orivej has quit [Ping timeout: 260 seconds]
<Regenaxer> aw- ?
<aw-> hi
<Regenaxer> :)
alexshendi has joined #picolisp
<Regenaxer> What do you mean with "\^" ?
<Regenaxer> (char 94)
<Regenaxer> it is a legal string
<aw-> yeah
alexshendi has quit [Ping timeout: 264 seconds]
alexshendi has joined #picolisp
alexshendi has quit [Client Quit]
alexshendi has joined #picolisp
<cilz> beneroth: sorry was away. I'm looking at the ninety nine problems...
<beneroth> no worries. I just commented on the chat log from yesterday ;)
<beneroth> you're learning very quickly it looks to me
<beneroth> have fun :)
<cilz> thanks :)
alexshendi has quit [Read error: Connection reset by peer]
rob_w has quit [Quit: Leaving]
<tankf33der> i want define new symbol public, should define like cadr
<tankf33der> how better do it ?
<tankf33der> is it ok then ?
<tankf33der> (def 'public 'cadr)
libertas has quit [Ping timeout: 246 seconds]
<Regenaxer> Better (def 'public cadr)
libertas has joined #picolisp
<Regenaxer> It is faster at execution
<beneroth> so 'public has as value the VM-pointer of the function instead of pointing to cadr and then to the VM-pointer
<beneroth> (function address is the better word maybe?)
<tankf33der> ok
aw- has quit [Quit: Leaving.]
<Regenaxer> Both address or pointer
<Regenaxer> PicoLisp takes the value if it finds a symbol as a function
<Regenaxer> (setq a 'b b 'c c 'd d cadr) (a (1 2 3))
<Regenaxer> But this is resoved at runtime of course
<Regenaxer> resolved
rob_w has joined #picolisp
rob_w has quit [Client Quit]
rob_w has joined #picolisp
mtsd has quit [Quit: Leaving]
ewquite has joined #picolisp
ewquite has quit [Read error: Connection reset by peer]
saperO8L9C6 has joined #picolisp
saperO8L9C6 has quit [Client Quit]
alexshendi has joined #picolisp
shpx has joined #picolisp
shpx has quit [Client Quit]
shpx has joined #picolisp
shpx has quit [Ping timeout: 260 seconds]
alexshendi has left #picolisp [#picolisp]
alexshendi has joined #picolisp
cess11_ has joined #picolisp
cess11 has quit [*.net *.split]
cilz has quit [Ping timeout: 260 seconds]
<clacke[m]> wow
<clacke[m]> so it keeps following symbols until it reaches something it can use. that's pretty pragmatic and cool.
<Regenaxer> Right, but you can also produce an infinite loop with that ;)
<Regenaxer> It checks only one level
<Regenaxer> : (setq a 'a)
<Regenaxer> -> a
<Regenaxer> : (a)
<Regenaxer> !? (a)
<Regenaxer> a -- Undefined
<Regenaxer> ?
<Regenaxer> Two level must be terminated with ^C
<Regenaxer> : (setq a 'b b 'a)
<Regenaxer> -> a
<Regenaxer> : (a)
<Regenaxer> (a)
<Regenaxer> !
dtornabene has joined #picolisp
dtornabene has left #picolisp [#picolisp]
dtornabene has joined #picolisp
libertas has quit [Ping timeout: 260 seconds]
libertas has joined #picolisp
yumaikas has left #picolisp ["WeeChat 0.4.2"]
orivej has joined #picolisp
orivej has quit [Ping timeout: 246 seconds]
libertas has quit [*.net *.split]
karswell has quit [*.net *.split]
rgrau has quit [*.net *.split]
nonlinear has quit [*.net *.split]
libertas has joined #picolisp
nonlinear has joined #picolisp
karswell has joined #picolisp
rgrau has joined #picolisp
nonlinear has quit [Max SendQ exceeded]
nonlinear has joined #picolisp
karswell has quit [Read error: Connection reset by peer]
karswell has joined #picolisp