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
libertas has quit [Ping timeout: 250 seconds]
libertas has joined #picolisp
libertas has quit [Ping timeout: 272 seconds]
libertas has joined #picolisp
libertas has quit [Ping timeout: 250 seconds]
libertas has joined #picolisp
libertas has quit [Ping timeout: 245 seconds]
libertas has joined #picolisp
libertas has quit [Ping timeout: 246 seconds]
alexshendi has quit [Read error: No route to host]
libertas has joined #picolisp
orivej has joined #picolisp
<Regenaxer> There is *nothing* you can do with 'var' which you can do with other Lisp functicons - except determining the low-level address orf an object
<Regenaxer> Makes *absolutely* no sense to use it for any data structure manipulations
<Regenaxer> razzy, why do you ask for advice if you ignore all we say?
libertas has quit [Ping timeout: 250 seconds]
libertas has joined #picolisp
_whitelogger has joined #picolisp
<tankf33der> morning
<tankf33der> maybe razzy and freemint are brothers or one person?
<Regenaxer> Hi tankf33der! Yes, we thought so too
<Regenaxer> However freemint matured after a short while
libertas has quit [Ping timeout: 272 seconds]
libertas has joined #picolisp
orivej has quit [Ping timeout: 250 seconds]
rob_w has joined #picolisp
orivej has joined #picolisp
libertas has quit [Ping timeout: 250 seconds]
libertas has joined #picolisp
libertas has quit [Ping timeout: 240 seconds]
libertas has joined #picolisp
libertas has quit [Ping timeout: 245 seconds]
libertas has joined #picolisp
ubLIX has joined #picolisp
<razzy> tankf33der: not one person in biological sense, nor brother.
libertas has quit [Ping timeout: 250 seconds]
libertas has joined #picolisp
<razzy> Regenaxer: i find opinions in #picolisp valuable, Regenaxer knowledge of pil is always on spot (one could say almost not human good, in good way). but because you do not know me, nor my goals, your advice is not always universally aplied.
rob_w has quit [Read error: Connection reset by peer]
libertas has quit [Ping timeout: 250 seconds]
libertas has joined #picolisp
ubLIX has quit [Ping timeout: 246 seconds]
ubLIX has joined #picolisp
<tankf33der> Regenaxer:
<tankf33der> question
<tankf33der> how to count objects in picodb
<tankf33der> ?
<tankf33der> btw
<tankf33der> (select +Cab ploc 265 dloc 265) works
<tankf33der> i want count where ploc and dloc = 265
<Regenaxer> There is no single way to count them
<Regenaxer> well, only on the low level, with 'dbck'
<Regenaxer> On higher levels we have counts per entity class, and per index
<Regenaxer> For such a filter, try 'iter'
<Regenaxer> You can iter the 'ploc' index
<Regenaxer> Hmm, I see no 'dloc' in the model
<Regenaxer> Otherwise it would be (let Cnt 0 (iter '(ploc . +Cab) '((This) (and (= 265 (: dloc)) (inc 'Cnt))) (265) (265 . T)) Cnt)
<Regenaxer> Not tested
<Regenaxer> (let Cnt 0 (pilog '((db ploc +Cab 265 @Cab) (val 265 @Cab dloc)) (inc 'Cnt)))
<Regenaxer> (again not tested)
<tankf33der> i see
<tankf33der> will try
<tankf33der> ive extend model for drop location
<tankf33der> :)
<tankf33der> length collect ploc 265 works
<tankf33der> now i want two fields
<Regenaxer> good. Not however that for big sets of data 'collect' is not a good idea
<Regenaxer> If you have two indexes to search over, 'select/3' is best
ubLIX has quit [Quit: afk haggis hunting]
<tankf33der> Regenaxer: select works, but interactively, i dont how pass search result to mapping
<Regenaxer> This is another select
<tankf33der> aaa
<Regenaxer> the *function*, only for debugging
<Regenaxer> Full description in doc/select.html
<tankf33der> seen
<Regenaxer> ok
<tankf33der> read several times in years
<Regenaxer> :)
<Regenaxer> It *is* complicated
<Regenaxer> Makes sense for involved searches over multiple indexes
<Regenaxer> (pilog ((select (@Cab) ((ploc +Cab 123) (foo +Cab (1 . 99))) (same 123 @Cab ploc) (range (1 . 99) @Cab foo))) ... (inc 'Cnt) ...
<Regenaxer> Something like that
<Regenaxer> select/3 is mostly used in GUI search dialogs and reports
<tankf33der> i want search and draw histograms
<Regenaxer> ok
<tankf33der> i will import all monthes of 2017 year and build several historgrams on it
<Regenaxer> Cool :)
Regenaxer has quit [Ping timeout: 252 seconds]
Regenaxer has joined #picolisp
aw- has joined #picolisp
<tankf33der> Regenaxer:
<tankf33der> select.html
<tankf33der> line ~75
<tankf33der> (let (Nr (1 . 4) Nm <u>Part</u> Pr '(NIL . 100.00))
<tankf33der> should "Part"
<Regenaxer> Yeah, that's better. Thanks
<tankf33der> copy-paste dont work then
<Regenaxer> right
<Regenaxer> fixed
DKordic has joined #picolisp
<rick42> hello folks!
<rick42> i hope your day is going well
<Regenaxer> Hi rick42! Thanks!!
<rick42> hi Regenaxer!
<rick42> :)
<rick42> On this: <razzy> [...] because you do not know me, nor my goals, your advice is not always universally aplied.
<rick42> i think everyone here would agree with that.
<rick42> that is precisely why when you (and others, including me) ask a question here, people will often ask you "what are you really trying to do?"
<rick42> they know from experience that often times the original question is not posed with the context they really need to help you/me.
<rick42> in trying to be concise (to help others help us) we often miss giving out some necessary information
<rick42> it's not totally our fault: we sometimes don't know what is necessary until the last minute! :)
<rick42> i'd say that's normal for Q&A-style interaction on #anything
<rick42> that's my long-winded way of saying "no worries, mate" :)
<rick42> tankf33der: i don't know what `ploc` refers to, but my first thought (without reading context) was "picolisp lines of code" :) keep up the great work. it is insiring for me (although, so far i have only merely "stolen" your code for personal use :).
<rick42> example of tankf33der code "stealing": https://gist.github.com/cryptorick/b8167cbf9b5633e7f7ba2a4b53bda3cc
<beneroth> yo rick42
<rick42> beneroth: o/
<Regenaxer> ret
<Regenaxer> Hi beneroth!
<beneroth> Hi Regenaxer !
libertas has quit [Ping timeout: 268 seconds]
libertas has joined #picolisp
orivej has quit [Ping timeout: 246 seconds]
libertas has quit [Ping timeout: 268 seconds]
libertas has joined #picolisp
orivej has joined #picolisp
orivej has quit [Ping timeout: 245 seconds]
<razzy> is there early version of picolisp interpretter for understanding? more like skeleton close to maru? https://github.com/kstephens/maru/tree/master/maru-1.0
<Regenaxer> You could look at miniPicoLisp
<Regenaxer> it is in C
<Regenaxer> or Ersatzlisp which is in Java
<razzy> thx.
<Regenaxer> If you want something really small, get https://software-lab.de/8kLisp.tgz
<Regenaxer> It is only 8 KiB runtime
<Regenaxer> a direct predecessor of PicoLisp, in Z80 assembly
<razzy> can i run it reasonably?
<beneroth> if you have to ask, then the answer is probably no :P
<Regenaxer> yes, if you install the CP/M emulator on Linux
<beneroth> oh good answer!
<Regenaxer> I ran it here a few years ago
<beneroth> what ideas does it share with PicoLisp, what is different, roughly?
<Regenaxer> It is very minimalistic naturally
<Regenaxer> but has bignums (up to 127 bytes iirc)
<beneroth> show me something you made which isn't
<beneroth> minimalistic
<Regenaxer> haha
<Regenaxer> But compared to that pil is *huge*
<beneroth> T. though compared to anything remotely mainstream, pil is pico
<Regenaxer> yep
<razzy> hm, minipicolisp sounded funny ant first :]
<Regenaxer> I made the first version of Pilog on 8kLisp btw
<beneroth> nice
<Regenaxer> minipil is better to recommend
<beneroth> prolly not important for anyone here
<Regenaxer> Hmm, page does not load
<Regenaxer> ah, now
<Regenaxer> yeah, I never used it
<beneroth> [OT/security] remote code execution vulnerability found in SQLite and Chromium: https://blade.tencent.com/magellan/index_en.html
<beneroth> how nice that Microsoft just announce to switch Edge also to Chromium, so all browsers except Firefox use chromium soon. One exploit to rule them all...
<beneroth> btw. here some background info how Microsoft came to abandon their browser engine (hint: it looks like Google plays unfair): https://news.ycombinator.com/item?id=18697824
orivej has joined #picolisp
orivej has quit [Ping timeout: 268 seconds]
orivej has joined #picolisp
orivej has quit [Ping timeout: 240 seconds]