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
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej_ has joined #picolisp
orivej has quit [Ping timeout: 260 seconds]
orivej_ has quit [Read error: Connection reset by peer]
orivej has joined #picolisp
orivej_ has joined #picolisp
orivej has quit [Ping timeout: 256 seconds]
orivej_ has quit [Ping timeout: 264 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 256 seconds]
orivej_ has joined #picolisp
orivej has joined #picolisp
orivej_ has quit [Ping timeout: 256 seconds]
orivej has quit [Ping timeout: 246 seconds]
orivej has joined #picolisp
orivej_ has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
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
salotz has quit [Write error: Connection reset by peer]
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 [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Ping timeout: 260 seconds]
orivej has joined #picolisp
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Ping timeout: 256 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
orivej_ has joined #picolisp
orivej has quit [Read error: Connection reset by peer]
orivej has joined #picolisp
orivej_ has quit [Read error: Connection reset by peer]
orivej_ has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
orivej has joined #picolisp
orivej_ has quit [Read error: Connection reset by peer]
orivej has quit [Ping timeout: 265 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 260 seconds]
orivej has joined #picolisp
orivej has quit [Read error: Connection reset by peer]
orivej_ has joined #picolisp
orivej_ has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej_ has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
mtsd has joined #picolisp
orivej_ has quit [Ping timeout: 264 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 246 seconds]
orivej has joined #picolisp
<aw-> hi all
<Regenaxer> Cheers aw-
<aw-> i'm looking for something
<aw-> someone posted to the list a while back
<aw-> some picolisp code that draws graphics
<aw-> ascii art maybe?
<Regenaxer> @lib/canvas?
<aw-> my memory is fuzzy
<Regenaxer> or the Vip lib?
<Regenaxer> Vip can draw ascii diagrams
<aw-> oh yes, i think that's it
<Regenaxer> hmm, I forgot a little
<Regenaxer> there was a video
<aw-> did you remove the code?
<Regenaxer> no
<Regenaxer> Is there @lib/vip/draw.l ?
<Regenaxer> too long ago ;)
<aw-> yeah
<aw-> i just found it
<aw-> was looking in @lib/vip.l
<Regenaxer> I should play with it again
<Regenaxer> Memory garbage collected already
<aw-> hahaha
<Regenaxer> I still have the demo code
orivej has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
<Regenaxer> For example http://ix.io/2oHx
<Regenaxer> you do $ vip <file>
<Regenaxer> the hit 'v'
<Regenaxer> ok, 'vip' is a script here
<Regenaxer> with a single line (load "@bin/vip")
<aw-> #/bin/vip:6] COLUMNS or LINES not set
<Regenaxer> needs to be exported in .bashrc probably
<aw-> $ pil +
<aw-> : (load "@bin/vip")
<aw-> [/usr/lib/picolisp/bin/vip:6] COLUMNS or LINES not set
<Regenaxer> export COLUMNS LINES
<Regenaxer> in .bashrc
<Regenaxer> Normally this is set
<aw-> hmmm
<aw-> doesn't work.. that's weird.. i wonder if I packaged picolisp incorrectly for tinycore linux
<aw-> it's v19.12.28
<Regenaxer> still COLUMNS not set?
<aw-> yes
<Regenaxer> It is a shell env issue
<mtsd> Hello all
<Regenaxer> Hi mtsd
<Regenaxer> aw-, you can also just export it in this session
<mtsd> I recognize COLUMNS or LINES not set, think I ran into that too
<aw-> yes i tried that too
<Regenaxer> $ export COLUMNS LINES
<Regenaxer> strange
<mtsd> But I did not have time to look at it further then
<Regenaxer> $ set |fgrep COLUMNS
<Regenaxer> is it set?
<Regenaxer> After export you should have
<Regenaxer> $ env |grep COLUMNS
<Regenaxer> COLUMNS=48
<aw-> ah
<aw-> no i dont
<aw-> ok I need to set them
<aw-> what value for LINES?
<Regenaxer> I think bash sets it
<Regenaxer> also then the terminal is resized
<Regenaxer> Better not set manually
<Regenaxer> it may change
<aw-> ok i got it
<Regenaxer> if not exported, you should at least see it with set |grep COLUMNS
<aw-> it works
<aw-> now what?
<Regenaxer> So vip started?
<aw-> yes
<aw-> it works
<Regenaxer> good
<mtsd> Worked here after export COLUMNS LINES
<Regenaxer> Then you could open the file I posted
<mtsd> had to test..
<Regenaxer> mtsd, good
<aw-> ok it's open
<Regenaxer> 'v' in command mode
<Regenaxer> shows ASCII drawing?
<Regenaxer> it opens a new buffer
<aw-> ohh rihght
<aw-> right*
<aw-> i see..
<aw-> interesting
<aw-> how can i use this without vip?
<aw-> (box) and (arrow) only?
<aw-> oh i need to load draw.l
<Regenaxer> Not sure if/how draw.l works stand-alone
<aw-> nope
<Regenaxer> it builds vip buffer structures
<Regenaxer> lists of lists uf chars
<Regenaxer> You can save the result in vip of course
<Regenaxer> :w
<Regenaxer> :w myfile
orivej has quit [Quit: No Ping reply in 180 seconds.]
orivej has joined #picolisp
orivej has quit [Ping timeout: 260 seconds]
orivej_ has joined #picolisp
orivej_ has quit [Ping timeout: 258 seconds]
orivej has joined #picolisp
rob_w has joined #picolisp
<rob_w> good morning channel
<Regenaxer> Hi rob_w
<rob_w> hey Regenaxer
<beneroth> hi rob_w :)
<beneroth> hallo everyone
<Regenaxer> Hi beneroth
<rob_w> Regenaxer, today is not good for me, a cold has creeped up on me
<Regenaxer> Oh!
<Regenaxer> No hurry, I'm also not at home atm, and a bit busy
<Regenaxer> Take care!
<Regenaxer> Covid19?
<rob_w> but i need to solve my bucketlist to go ;.) so i will get back to u
<Regenaxer> sure :)
<rob_w> well if its covid then goodnight
<Regenaxer> You are young ;)
<rob_w> on paper ... but my lung is not in best form
<Regenaxer> Smoking kills the virus
<rob_w> thats what they say .. but who knows
<rob_w> but i get back to you and you will be thrilled , i got quite some "special to me" problems for you
<Regenaxer> :)
orivej has quit [Ping timeout: 260 seconds]
orivej_ has joined #picolisp
mtsd has quit [Quit: Leaving]
orivej_ has quit [Ping timeout: 264 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
orivej has quit [Read error: Connection reset by peer]
orivej has joined #picolisp
<Regenaxer> Next: Pil21 signal handling
orivej has quit [Ping timeout: 260 seconds]
orivej_ has joined #picolisp
<beneroth> wohoo
<aw-> hey beneroth
<aw-> this might interest you
<aw-> (warning IT'S A SCAM)
<aw-> (credit patrixl)
<beneroth> ah, I saw this mentioned on Twitter weeks ago, but not this url
<beneroth> funny how the whole medium layout/CSS/everything got duplicated for this phishing :-)
<aw-> yes it's a brilliantly executed scam
<patrixl> they're even circulating faked twitter screenshots dated today of @elonmusk posting about it
orivej_ has quit [Ping timeout: 258 seconds]
orivej has joined #picolisp
<beneroth> patrixl, same with trump tweets, though there it is much harder to tell which one are fakes and which ones are indeed real
<patrixl> hahahaha
orivej has quit [Read error: Connection reset by peer]
orivej has joined #picolisp
razzy 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
razzy has quit [Ping timeout: 256 seconds]
orivej has quit [Ping timeout: 265 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 256 seconds]
orivej has joined #picolisp
rob_w_ has joined #picolisp
rob_w has quit [Ping timeout: 260 seconds]
orivej_ has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
orivej_ has quit [Ping timeout: 264 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 264 seconds]
patrixl has quit [Ping timeout: 264 seconds]
<Regenaxer> Oh! We have somewhere a non-gc-safe function in pil21
<Regenaxer> No idea where
<Regenaxer> Happens when auto-building. With standard pil it builds, also if called with -"gc 400".
<tankf33der> i will play, this is something new
<Regenaxer> *very* hard to reproduce
<tankf33der> my tests are wrapped bu gc 256
<Regenaxer> I can release a non-ready version
<Regenaxer> It gives a build error
<Regenaxer> released
<Regenaxer> if you make, you *may* get
<Regenaxer> llvm-as: base.ll:75418:11: error: expected value token
<Regenaxer> ret i64 void
<Regenaxer> ^
<Regenaxer> This is a nonsense error
<Regenaxer> in base.ll one line is missing
<Regenaxer> the line before that
<Regenaxer> But the code genrater is very involved
<Regenaxer> very hard to find the reason
<Regenaxer> If a few lines are added or removed somewhere, this error disappears
<Regenaxer> or if you call with -"gc 400"
<Regenaxer> so it is probably som illegally collected data
<Regenaxer> i.e. it 'save'd
<Regenaxer> Would be really cool if you find the faulty function with some gc-tests
<tankf33der> yeah, hardcore
<beneroth> sounds like a Heisenbug
<beneroth> happy hunting :)
<Regenaxer> thanks! :)
<tankf33der> http://ix.io/2oKl
<tankf33der> found while having fun with gc.
<tankf33der> wrong in pil21.
<Regenaxer> I see
<Regenaxer> indeed
<Regenaxer> So which function is wrong? :)
<Regenaxer> Seems to be mapcar
<Regenaxer> : (length (mapcar inc (range 1 100000)))
<Regenaxer> -> 20242
<Regenaxer> But:
<Regenaxer> !: (length (range 1 100000))
<Regenaxer> -> 100000
<tankf33der> it works if you add (gc 128)
<tankf33der> :)
<tankf33der> in front.
<Regenaxer> : (gc 400) (length (mapcar inc (range 1 100000))
<Regenaxer> )
<Regenaxer> -> 100000
<Regenaxer> yes
<Regenaxer> Cool
<Regenaxer> Thanks a lot!!
<Regenaxer> Should be rather easy now
<Regenaxer> I look tomorrow, too sleepy now
<tankf33der> ok
<tankf33der> afk
<Regenaxer> cu
<tankf33der> i will try git bisect and report if successfully found something.
<Regenaxer> What does bisect do?
<tankf33der> do set good commit and bad commit and it checkout commits by steps and show you where bug begun.
<tankf33der> here
<tankf33der> range again.
<tankf33der> so
<tankf33der> commit where range was born
<tankf33der> :)
<tankf33der> but before that commit (mapcar inc L) worked.
<tankf33der> I've generated list without range.
<tankf33der> like this:
<tankf33der> (setq L (make (for N 100000 (link N]
<tankf33der> (mapcar inc L)
<Regenaxer> I changed the mapping functions several times
<Regenaxer> But 'range' is not the problem, right? Just in the same commit?
<tankf33der> (range 1 anynumber) always works
<tankf33der> but mapcar inc L always crash it
<Regenaxer> yes
<Regenaxer> also extract
<Regenaxer> and inc or prog or cons
<Regenaxer> so it is the mapping functions in general
<tankf33der> mapcar crash it because of gc when creating new list.
<Regenaxer> does not crash though
<tankf33der> corrupt it.
<Regenaxer> yes, this is always the case with these gc issues
<Regenaxer> not correctly 'save'd data
<Regenaxer> during 'cons'
<Regenaxer> and mapcar or extract cons a new list
<Regenaxer> 'range' is not the problem here, it is already finished when mapcar starts
<Regenaxer> Anyway, afp
<tankf33der> at the same time in this broken checkout this one works:
<tankf33der> (setq L (range 1 100000))
<tankf33der> (mapcar inc L)
<tankf33der> only this corrupts:
<tankf33der> (mapcar inc (range 1 100000))
<tankf33der> afk.
<tankf33der> commit above is wrong, I found below in list corrupted result too.
<beneroth> wow, good find tankf33der!
<Regenaxer> (setq L (... works naturally, because the value *is* safe as it is also referred to from the symbol 'L', which in turn is intered in the namespace
<tankf33der> yea
<tankf33der> afk 100%
<Regenaxer> It is really very tricky to save everything necessary, but not more
<Regenaxer> yeah, me too :)
rob_w_ has quit [Quit: Leaving]
patrixl has joined #picolisp