Re: [Amforth] Amforth 4.4. - issues

[pito <pi...@vo...>]

..a pity it shots down amforth so I have to reload- 

> : place-rec ( xt -- )
ok    get-recognizer
ok    dup >r
ok    1-  n>r
n>r ?? -13 12
>     swap
ok
>     nr> drop r> 1+
nr> ?? -13 8
>     set-recogniz

BAANGGG


> 
> use a word place-rec as a helper word.
> 
> : place-rec ( xt -- )
> get-recognizer
> dup >r
> 1-  n>r
> swap
> nr> drop r> 1+
> set-recognizer
> ;
> 
> and have a look at the following session log
> 
> 
> > 123e4 fs.
> 123e4 ?? -13 6
> > ' rec-float place-rec
> ok
> > 123e4 fs.
> 1.2299999E6 ok
> >
> 
> HTH
> Matthias
>