I can't believe none of us noticed, this is the first example that
worked OK (the articles):

  (dm put> (Key Val)
     (ifn (== Key 'body)
        (super Key Val)
        (super 'body T)
        (out (blob This 'body)
           (prinl Val) ) ) )

And this is the one that didnt' work (the article words):

(dm put> (Key Val)
  (super This Key T)
  (out (blob This Key)
     (prinl Val)))

Notice the "This" in the call to super...

Changing to:

(dm put> (Key Val)
  (super Key T)
  (out (blob This Key)
     (prinl Val)))

Makes everything work like it should.

/Henrik


On Fri, Sep 25, 2009 at 8:42 PM, Alexander Burger <a...@software-lab.de> wrote:
> Hi Henrik,
>
> On Sat, Sep 19, 2009 at 08:34:36PM +0200, Alexander Burger wrote:
>> ...
>> > [test3.l:23] !? (has> (meta This Var) Val (get This Var))
>> > has> -- Bad message
>> ...
>> And what is 'Var', and - most important - (meta This Var). The latter
>> one must be something which cannot handle 'has>'.
>
> Just tell us what these values are when you are at the error prompt.
> Then we'll probably know what goes wrong.
>
> Cheers,
> - Alex
> --
> UNSUBSCRIBE: mailto:picol...@software-lab.de?subject=unsubscribe
>
-- 
UNSUBSCRIBE: mailto:picol...@software-lab.de?subject=unsubscribe

Reply via email to