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
--
UNSUBSCRIB
(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 ever
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 contains 2 consecutive spaces
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 even this over Reader Comme
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 " ")
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 :-)
https://githu