I see, I had misunderstood the @'s meaning there. Thanks for the
clarification!
On Tue, May 18, 2021 at 12:03 AM Alexander Burger
wrote:
> On Mon, May 17, 2021 at 04:53:50PM -0500, polifemo wrote:
> > So, running:
> > (task -5000 (/ @ 5) (tty (println 'a)))
> >
> > does not save in *Run my expected:
> > (-5000 -1000 (tty (println 'a)))
> >
> > but instead it saves this:
> > (-5000 NIL (tty (println 'a)))
> >
> > my guess is that `(eval (++ Prg) 1)` is not working properly, though I am
> > probably just doing it wrong.
>
> It all depends on what is *before* the 'task' call. After all, the purpose
> of
> the 'eval' offset is to use the *caller*'s value of '@'.
>
> For example:
>: (when (format (key))
> (task -5000 (msg (* @ 10))
> (tty (println 'a)) ) )
>70 # After hitting key "7"
>-> (-5000 70 (tty (println 'a)))
>a
>a
>
>
> ☺/ A!ex
>
> --
> UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe
>