Re: [Amforth] Amforth 4.4. - issues

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

I added the missing words to dict_appl_core.inc (otherwise I got an
error like branch too far or something like that):

.include "dict_core.inc"
.include "words/store-e.asm"
.include "words/fetch-e.asm"

.include "words/store-i.asm"
.include "words/store-i_nrww.asm"
.include "words/fetch-i.asm"

.include "words/n_to_r.asm"
.include "words/n_r_from.asm"

_______________________________

After compilation, upload of everything needed ( I hope so):

>  ' rec-float place-rec
ok
> 1.222e-23 4.556e12 f* fs.
amforth 4.4 ATmega32
> 
ok
> 4.555e2 fs.
amforth 4.4 ATmega32
> 123e4 fs.
amforth 4.4 ATmega32
> 
ok

p.


----- PŮVODNÍ ZPRÁVA -----
Od: "pito" <pi...@vo...>
Komu: mt...@we..., pi...@vo...,
amf...@li...
Předmět: Re: [Amforth] Amforth 4.4. - issues
Datum: 25.5.2011 - 20:42:15

> ..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
> > 
> 
> 


-- 
IHNED.cz je nový, přehlednější a rychlejší. Přesvědčte se na:
www.ihned.cz