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
alexshe70 has joined #picolisp
alexshendi has quit [Read error: Connection reset by peer]
alexshe70 has quit [Read error: Connection reset by peer]
alexshendi has joined #picolisp
aw- has quit [Quit: Leaving.]
aw- has joined #picolisp
chexum has quit [Ping timeout: 240 seconds]
chexum has joined #picolisp
chexum has quit [Remote host closed the connection]
chexum has joined #picolisp
alexshendi has quit [Read error: Connection reset by peer]
alexshendi has joined #picolisp
alexshendi has quit [Quit: -a- Connection Timed Out]
alexshendi has joined #picolisp
pfd has quit [Ping timeout: 252 seconds]
alexshendi has quit [Read error: Connection reset by peer]
alexshendi has joined #picolisp
alexshe40 has joined #picolisp
alexshendi has quit [Ping timeout: 240 seconds]
alexshendi has joined #picolisp
alexshe40 has quit [Read error: Connection reset by peer]
alexshe82 has joined #picolisp
alexshendi has quit [Ping timeout: 260 seconds]
alexshendi has joined #picolisp
alexshe82 has quit [Ping timeout: 240 seconds]
alexshe66 has joined #picolisp
alexshendi has quit [Ping timeout: 260 seconds]
alexshe66 has quit [Quit: -a- Connection Timed Out]
alexshendi has joined #picolisp
alexshendi has quit [Quit: -a- Connection Timed Out]
alexshendi has joined #picolisp
<Hunar[m]> (pbGet) hangs on wsl, works in linux .. both latest version of pil
<abu[m]> I see. There seem to be various troubles with WSL :(
<Hunar[m]> How can I debug this hang? too see what migh be the problem
<abu[m]> I would start with strace
alexshendi has quit [Quit: -a- Connection Timed Out]
alexshendi has joined #picolisp
<Hunar[m]> Ok, I looked at pbGet, traced pr, i have this, left picture is WSL hanging
<abu[m]> Not hangin in 'pr'
<Hunar[m]> hmm, I though the different outputs was useful :/
alexshe21 has joined #picolisp
alexshendi has quit [Read error: Connection reset by peer]
<abu[m]> How about strace on the process running on WSL?
<abu[m]> Question to anybody interested: What is the future of PilCon?
<abu[m]> Should we set up something to make it more plannable?
<abu[m]> Concerning subject, participation and schedule?
<abu[m]> What I'm thinking of is some platform where we can decide a subject in advance, then anybody interested can propose a date and time
<abu[m]> When we see that there is enough interest and the dates/times match, PilCon can take place
<Hunar[m]> abu the problem is I never used strace before :| I'll try to learn in the next few hours
<abu[m]> ok, the syntax here is "strace -p <pid>'
<abu[m]> I meant: "strace -p <pid>"
<abu[m]> strange, on Matrix the angular brackets are swallowed together with the "pid". Grr
<Hunar[m]> pastebin.com/raw/Y9fCWUD7 the output looks alien to my eyes :)
pfd has joined #picolisp
<abu[m]> It is idle, not really hanging. Just waits for input.
alexshe21 is now known as alexshendi
alexshendi has quit [Read error: Connection reset by peer]
alexshendi has joined #picolisp
alexshendi has quit [Read error: Connection reset by peer]
alexshendi has joined #picolisp
alexshe53 has joined #picolisp
alexshendi has quit [Read error: Connection reset by peer]
alexshendi has joined #picolisp
alexshe53 has quit [Read error: Connection reset by peer]
alexshe78 has joined #picolisp
alexshendi has quit [Read error: Connection reset by peer]
alexshe78 is now known as alexshendi
<abu[m]> Hunar: I checked with (vi 'pbGet). What it does is trying to connect back to the terminal. This fails, that's why nothing is to see in the strace.
<abu[m]> So some network issue
<abu[m]> android: (java (; (wipe CONTEXT) Terminal) 'getInetAddress)
<abu[m]> -> {H@@@17700000001}
<abu[m]> android: (java @ 'getHostAddress)
<abu[m]> -> "127.0.0.1" # Localhost on Termux
<Hunar[m]> Hmm, I like to solve it but I can also use the linux virtual machine I have at work and ignore wsl ..
chexum has quit [Remote host closed the connection]
chexum has joined #picolisp
<Hunar[m]> Question, if I incrementaly create an app within pilbox, what is a good way to zip the whole folder and send it to my computer or to the sdcard?
<abu[m]> I know of no way to zip things on the device. So (pbGet) should be fine, then zip on the PC
<abu[m]> Wait
<abu[m]> On my device there seems to be 'tar'
<abu[m]> (call "tar" ...) then (pbGet "x.tar")
<abu[m]> It depends on the BusyBox or so what is available
<Hunar[m]> Yeah but that is each file at a time .. I thought there would be a better option .. Can you give storage permission to PilBox? like how termux can access the sdcard
<abu[m]> I think storage can be given with proper (java ) call, but I never investigated that
<abu[m]> scoped storage
<Hunar[m]> Great, this worked (!tar cfzv hello.tgz hello)
<abu[m]> Good to know ☺
<Hunar[m]> Another question :) split only accepts 1 character seperator, how to use 2+ characters? (mapcar pack (split (chop "abc;;def;;ghi") ";"))
<abu[m]> Split accepts 'any' item
<abu[m]> several of them
<Hunar[m]> Then I dont know how to use it :) .. I want to turn something like this "ab, cd, ef" to '("ab" "cd" "ef") .. I use this alot
<abu[m]> Then split on "," and then 'clip'
<abu[m]> (mapcar clip (split ... ","))
<Hunar[m]> But, that is a special case.. I want an arbitrary seperator, like ";+;" not pratical but demonstraits my question
<abu[m]> It can be done in a similar way
<abu[m]> split on the primary delimiter
<abu[m]> then cut off the garbage and other stuff
<abu[m]> Sorry, I have a meeting now. Will respond later.
<Hunar[m]> No worries, I'll send an edge case too, read them later :)
pfd has quit [Quit: Client closed]
<Hunar[m]> I recently processed a weird text file, something like "t h i s i s a t e x t" so a space was two, and a space was between each letter, I had to replace " " with ";" then " " with "" then ";" with " " to avoid mixing between single and double space, which fixed the file and made "this is a text"
<Hunar[m]> In python this is simply "t h i s i s a t e x t".replace(" ", ";").replace(" ", "").replace(";"," ")
<Hunar[m]> So the split I'm looking for needs to e.g ignore single character ";" when looking for double ";;"
pfd has joined #picolisp
<abu[m]> So you can use here also 'replace', no?
<abu[m]> Another way would be 'match'
<abu[m]> (while (match '(@A ";" ";" @Z) Lst) (setq Lst (conc @A "xxx" @Z)) )
<Hunar[m]> If I could replace the multiple-letter-seperator then that would also work, replace ";+;" with a single character then split
<abu[m]> with something useful for "xxx"
<abu[m]> T
<Hunar[m]> I played with your code alittle bit and couldn't get the xxx to show up
<abu[m]> My fault
<abu[m]> (conc @A (list "xxx") @Z)
<abu[m]> 'conc' ingnores atoms
<Hunar[m]> Perfect :D "ab;;cd;;ef" turns into ("a" "b" "xxx" "c" "d" "xxx" "e" "f") great
<Hunar[m]> That solves my problems, thanks
<abu[m]> ☺
alexshe10 has joined #picolisp
alexshendi has quit [Read error: Connection reset by peer]
alexshe10 is now known as alexshendi
<abu[m]> Another, more direct, but longer way is:
<abu[m]> (make (while (match '(@A ";" ";" @Z) Lst) (link @A) (setq Lst @Z)) (link Lst))
<abu[m]> This does not need a following 'split'
<abu[m]> So it is more efficient in terms of avoiding garbage (a little ;)
<Hunar[m]> Thats much better :)
<abu[m]> Good style is if you protect the match pattern symbols:
<abu[m]> (use (@A @Z) (make ...
alexshendi has quit [Quit: -a- Connection Timed Out]
alexshendi has joined #picolisp