Serial communication?

Hi list. As mentioned before, I've got picolisp running on a mips32r2 system running librecmc-1.3.4. I want to communicate with an ACM device available at /dev/ttyACM0. Is there a library for serial communication? And/Or do I need to interface to a C library? -- https://qlfiles.net --

Re: clip and chop down consecutive "internal" white spaces to one space??

(de trimmr (S C) (default C " ") (glue C (filter '((E) E) (split (chop S) C : (setq Str " spaaaces, spaaaces everywhere spaaaces spaaaces r so squuare ") -> " spaaaces, spaaaces everywhere spaaaces spaaaces r so squuare " : (trimmr (trimmr Str) "a") -> "spaces, spaces

Re: clip and chop down consecutive "internal" white spaces to one space??

fun does this do it? (pack (mapcon '((X) (ifn (= '(" " " ") (head 2 X)) (cons (car X (chop S))) -> " this contains 2 consecutive spaces " On Feb 17, 2017 5:23 PM, "dean" wrote: > I've done this and it works but...is there a slicker way :) > > (setq S " this

Re: (= code data)

On 6 February 2017 at 20:03, Danilo Kordic wrote: > ..[snip].. > > Hi Rowan. > > [de help: [Sym Txt] > [def Sym 'help: Txt] ] > > [help: "`prop'erty is clearly better than a txt in `prg' if it should > be extracted by a procedure. " > [de help [Sym] > "I prefer

clip and chop down consecutive "internal" white spaces to one space??

I've done this and it works but...is there a slicker way :) (setq S " this contains 2 consecutive spaces ") (de shrink (Str) #can't clip before inner pack so need to pack, chop, clip and re-pack (pack (clip (chop (pack (let (Last_ch " ")

REPL in the browser, picolisp as primary example/screenshot

I wrote a little proof-of-concept tool to embed an arbitrary REPL in the browser using websocketd in the backend - nothing particularly clever or high-profile about that, I know - but more relevant here is that I used picolisp (pil) as first example, and in the first screenshot :-)