Re: help with list of capital letters as symbol property key

2016-12-14 Thread Alexander Burger
On Wed, Dec 14, 2016 at 07:18:42AM +, dean wrote: > : (setq LstA (chop 'dOg)) > -> ("d" "O" "g") > : (pick '((Ch) (and (= Ch (uppc Ch)) Ch)) LstA) > -> "O" > > but wonder if there's a slicker way? Yes: : (find upp? (chop "dOg")) -> "O" - Alex -- UNSUBSCRIBE: mailto:picolisp@software-l

Tests in PicoLisp

2016-12-14 Thread Christophe Gragnic
Hi, In lib/test.l I read: ««« Local usage: # ./pil lib/test.l -bye + »»» Shouldn't it be ««« bin/pil lib/test.l -bye + »»» or «./pil ../lib/test.l -bye +» or anything like that? Also, I humbly suggest (once again) this kind of target in the makefiles: ««« test: $(bin)/pil $(lib)/test.l -by

Re: Compiling for containers

2016-12-14 Thread David Bloom
This is also my fault. That error message "java: not found" is really stupid. I've changed it to some better diagnostics. - Alex Don't be so hard on yourself. I'd truly rather deal with a rare instance of ambiguous error messages (but with help from the community) than all of the other issues i

Re: Tests in PicoLisp

2016-12-14 Thread Alexander Burger
Hi Christophe, > In lib/test.l I read: > ««« > Local usage: > # ./pil lib/test.l -bye + > »»» > > Shouldn't it be > ««« > bin/pil lib/test.l -bye + Not really. The bin/pil script is a template to be copied or linked to /usr/bin, i.e. a global installation. You see it from the hashbang line #!/us

Re: Tests in PicoLisp

2016-12-14 Thread Christophe Gragnic
On Wed, Dec 14, 2016 at 2:53 PM, Alexander Burger wrote: > Hi Christophe, > >> In lib/test.l I read: >> ««« >> Local usage: >> # ./pil lib/test.l -bye + >> »»» >> >> Shouldn't it be >> ««« >> bin/pil lib/test.l -bye + > > Not really. The bin/pil script is a template to be copied or linked to > /u

Re: help with list of capital letters as symbol property key

2016-12-14 Thread dean
Great!thank you very much indeed! Best Regards Dean On 14 December 2016 at 08:03, Alexander Burger wrote: > On Wed, Dec 14, 2016 at 07:18:42AM +, dean wrote: > > : (setq LstA (chop 'dOg)) > > -> ("d" "O" "g") > > : (pick '((Ch) (and (= Ch (uppc Ch)) Ch)) LstA) > > -> "O" > > > > but wond

Re: help with list of capital letters as symbol property key

2016-12-14 Thread Bruno Franco
@Alex I'm surprised that (pick '((A B) (and (= A Value) B)) ListA ListB) is faster than (get ListB (index Value ListA)). It's true that get traverses ListB right after a traversal of ListA, but pick seems to do the same traversal of the same number of elements. The only difference is that pick trav

Re: help with list of capital letters as symbol property key

2016-12-14 Thread Alexander Burger
Hi Bruno, > I'm surprised that (pick '((A B) (and (= A Value) B)) ListA ListB) is > faster than (get ListB (index Value ListA)). > It's true that get traverses ListB right after a traversal of ListA, but > pick seems to do the same traversal of > the same number of elements. The only difference i

Loosing elements in a sorted list

2016-12-14 Thread Bruno Franco
Hi list, I have a problem. Whenever I sort a list stored in a symbol, some elements are erased from the original list. Look: : (setq A (3 2 5 4 1 1 1 1 0 1 2 4 5 )) -> (3 2 5 4 1 1 1 1 0 1 2 4 5) : (sort A) -> (0 1 1 1 1 1 2 2 3 4 4 5 5) : A -> (3 4 4 5 5) The pattern that I've noticed is that a

Re: Loosing elements in a sorted list

2016-12-14 Thread John Duncan
This is because A still points at the cons that was the head of the list before sorting. If you want to update it, you have to set A to the result of sort. On Dec 14, 2016 8:37 PM, "Bruno Franco" wrote: > Hi list, I have a problem. > > Whenever I sort a list stored in a symbol, some elements are