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
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
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
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
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
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
@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
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
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
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
10 matches
Mail list logo