ChanServ changed the topic of #picolisp to: PicoLisp language | Channel Log: https://irclog.whitequark.org/picolisp/ | Check also http://www.picolisp.com for more information
Blukunfando has quit [Ping timeout: 264 seconds]
orivej has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Ping timeout: 240 seconds]
orivej has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Ping timeout: 246 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 260 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 246 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Ping timeout: 246 seconds]
orivej has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
rob_w has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
orivej_ has joined #picolisp
aw- has quit [Quit: Leaving.]
orivej has joined #picolisp
orivej_ has quit [Ping timeout: 264 seconds]
<Nistur> mornin'
<Regenaxer> Salami Nistur
<Nistur> om nom nom
alexshendi has quit [Remote host closed the connection]
<tankf33der> http://ix.io/2t2h
<tankf33der> pil21, llvm10, solaris11, sparc.
<Regenaxer> ok
<Regenaxer> linkFiles seems C++
<Regenaxer> linker crash it seems
<Regenaxer> before pil21 even runs
<tankf33der> http://ix.io/2t2i
<tankf33der> the same for clang9
<tankf33der> llvm ok, readline too old.
<Regenaxer> T
aw- has joined #picolisp
<tankf33der> readline is not too old
<tankf33der> it just not linked with ncursesw
<tankf33der> on linuxex linked out of box.
<Regenaxer> Ah, ok
<Regenaxer> But why the linker crash?
freemint has joined #picolisp
<tankf33der> it works on clang9
<tankf33der> now failed here
<tankf33der> http://ix.io/2t2n
orivej_ has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
aw- has quit [Quit: Leaving.]
freemint has quit [Remote host closed the connection]
freemint has joined #picolisp
orivej_ has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
aw- has joined #picolisp
<aw-> hi all
<aw-> i'm looking for the simplest way to split a string into a list of 4 chars, or 8 chars, etc...
<aw-> i feel this should be trivial :\
<Regenaxer> Hi aw-
<Regenaxer> Yes, 'chop'
<Regenaxer> (make (while (chop 4 'S) (link @]
<Regenaxer> I mean 'cut'
<Regenaxer> (make (while (cut 4 'S) (link @]
<aw-> yeah i was doing something similar..
<Regenaxer> (let S (chop Str) (make ..
<aw-> isn't there an easier way with (by) or (group) ?
<Regenaxer> I don't think so
<Regenaxer> they have no count
<aw-> hmm
orivej has quit [Ping timeout: 240 seconds]
orivej has joined #picolisp
beneroth has joined #picolisp
libertas has quit [Quit: ZNC - https://znc.in]
freemint has quit [Ping timeout: 260 seconds]
orivej has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
freemint has joined #picolisp
<Regenaxer> 'cut' is quite efficient. A multi-element 'pop' so to say
<aw-> i see
<aw-> and it's destructive
<Regenaxer> Not destructive
<Regenaxer> like 'pop'
<aw-> oh, not
<aw-> ok that's fine
<Regenaxer> :)
<aw-> ok one more problem
<aw-> let's say i have 2 lists: (104 101 108 108 111) and (119 111 114 108 100)
<Regenaxer> Mom, tel
<aw-> how can i perform an operation like: (fun 104 119), then (fun 101 111)... and obtain the result in a list?
<aw-> ok no problem
<aw-> i will try with (by)
<aw-> or (group)
<aw-> hmmm.. maybe uncessary.. (mapcar fun Lst1 Lst2) works
<beneroth> aw-, yeah that :)
<beneroth> (by) is only really meaningful with sort or (in rare cases) group a second argument
<aw-> yeah i managed to do something pretty awesome with (mapcar) by passing it multiple lists
<aw-> that's not a habit
orivej has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
<Regenaxer> done
<Regenaxer> Sorry, was un phone
<Regenaxer> yeah, I never found another use for (by)
<Regenaxer> only sort and group
<Regenaxer> group is quite common in reports
<Regenaxer> grouping by customer and other attributes
<aw-> in the form: (mapcar '((X Y) ... Lst1 Lst2), what if I have 3 or 4 or N lists?
<aw-> is it better to just use (mapcar '((N) ... Lst) where (let Lst '(Lst1 Lst2)) ??
<Regenaxer> You can pass as many lists as you like to the map functions
<Regenaxer> The first one is special
<Regenaxer> it gives the length of the operation
<aw-> right, but what if the number of lists is variable?
<Regenaxer> Then you can use 'apply'
<Regenaxer> (apply mapcar Lst Fun)
<beneroth> or (eval (make (link 'mapcar Lst1 Lst2))) if that turns out to be easier/more readable (only for very involved cases)
<Regenaxer> Yes, but less efficient
<beneroth> T
<Regenaxer> a *little* less perhaps
<aw-> ok i will try
<Regenaxer> And needs proper quoting
<aw-> thanks
<Regenaxer> which may not be trivial
<beneroth> Regenaxer, T, the quoting can be tricky
<beneroth> (lit) ftw!
<Regenaxer> Yeah
<Regenaxer> (lit Lst)
orivej has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
alexshendi has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
alexshendi2 has joined #picolisp
alexshendi2 has quit [Read error: Connection reset by peer]
alexshendi has quit [Read error: Connection reset by peer]
alexshendi has joined #picolisp
aw- has quit [Quit: g'nite]
orivej has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
freemint has quit [Ping timeout: 244 seconds]
orivej has quit [Ping timeout: 264 seconds]
beneroth has quit [Quit: Leaving]
orivej has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Ping timeout: 240 seconds]
orivej has joined #picolisp
beneroth has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 240 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 260 seconds]
alexshendi has quit [Quit: Yaaic - Yet another Android IRC client - http://www.yaaic.org]
casaca has quit [Remote host closed the connection]
casaca has joined #picolisp
rob_w has quit [Read error: Connection reset by peer]
orivej has joined #picolisp
orivej has quit [Ping timeout: 240 seconds]
orivej has joined #picolisp
orivej_ has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
orivej_ has quit [Ping timeout: 240 seconds]