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
aw- has joined #picolisp
theruran has quit [Ping timeout: 240 seconds]
theruran has joined #picolisp
aw- has quit [Quit: Leaving.]
aw- has joined #picolisp
aw- has quit [Quit: Leaving.]
aw- has joined #picolisp
razzy has quit [Ping timeout: 250 seconds]
razzy has joined #picolisp
olaf_h has joined #picolisp
<olaf_h> hi all
<Regenaxer> Servus olaf_h!
<olaf_h> Hey Regenaxer :-)
<olaf_h> Cool that you are present, i have a little question
<Regenaxer> ok
<olaf_h> howto read lines from a cvs file until a special line occurs. special line looks like ;;;;;;;;;;;
<olaf_h> i tried with (until (= ... ";;;;;") but dont know how to keep the (line) otherwise to work with
<Regenaxer> (while (split (line) ";")
<Regenaxer> ah
<olaf_h> if i strip off the bottom lines of the file ....
<Regenaxer> (use L (until (= (setq L (line) '`chop ";;;;;"))
<Regenaxer> (use L (until (= (setq L (line)) '`chop ";;;;;")) (do something with L]
<Regenaxer> ?
<olaf_h> ah, i see ... using setq ... ok ... i was using let and did not know how
<Regenaxer> yeah
<olaf_h> and finally undef L because setq does L global var, right?
<Regenaxer> or (while (line) (let L @ ...
<Regenaxer> no
<beneroth> olaf_h, (use L) ;)
<Regenaxer> It is 'use'd above
<beneroth> makes L local
<Regenaxer> yes
<Regenaxer> T
<olaf_h> plink :-)
<Regenaxer> :)
<beneroth> 'use is kinda the same like 'let, just without initialization
<Regenaxer> yes
<beneroth> (which means variables keep the values they might have from a higher scope)
<Regenaxer> 'let' is 'use' + 'setq'
<olaf_h> taTA (fanfare) - cool. Okay, that will help. Great, thanks for listening this channel constantly :-)
<Regenaxer> Welcome :)
<beneroth> I just opened the computer :D
<beneroth> have a nice weekend my dear friends :)
<olaf_h> so you close it already?
<Regenaxer> Hi beneroth! You too!
<olaf_h> you too, beneroth
<olaf_h> Regenaxer, you propose `chop ";;;;;" - i tried (pack (setq L (line))). Advantag of your's is less "runtime effort", right? because chop conversion is done once in "read time" ?
<Regenaxer> yes, exactly
<olaf_h> cool ... step for step things get clearer :-) ....
aw- has quit [Ping timeout: 240 seconds]
olaf_h has quit [Quit: Leaving]
aw- has joined #picolisp
aw- has quit [Ping timeout: 240 seconds]
Abhishek_ has joined #picolisp
aw- has joined #picolisp