From: pito <pi...@vo...> - 2011-05-25 12:49:29
|
Hi, I am trying to migrate from 4.0 - these are the first issues I've encountered - maybe it saves few minutes to the others: 1. qeens and life need pick.asm, ms.asm, udotr.asm included (or frts) 2. I am getting an error here (float lib's last word ;( ): > \ recognizer is a feature that is available for amforth 4.3 and up ok > : rec-float count >float ok if state @ if fliteral then -1 ?? -42 31 > else 0 ok > ; -p -- IHNED.cz je nový, přehlednější a rychlejší. Přesvědčte se na: www.ihned.cz |
From: Matthias T. <mt...@we...> - 2011-05-25 15:29:09
|
Hi Pito, >> : rec-float count >float > ok if state @ if fliteral then -1 > ?? -42 31 -42 means stack underflow, just add a postpone in front of fliteral. I'll add the fix later to the code base. Thanks for reporting Matthias |
From: pito <pi...@vo...> - 2011-05-25 18:09:43
|
Thanks, now it compiles! My feeling is I have to add the rec-float to the recognizer's list. How to? P. > >> : rec-float count >float > > ok if state @ if fliteral then -1 > > ?? -42 31 > > -42 means stack underflow, just add a postpone in > front of fliteral. I'll add the fix later to the -- IHNED.cz je nový, přehlednější a rychlejší. Přesvědčte se na: www.ihned.cz |
From: Matthias T. <mt...@we...> - 2011-05-25 18:20:27
|
Hi Pito, > Thanks, now it compiles! > My feeling is I have to add the rec-float to the recognizer's list. > How to? http://amforth.sourceforge.net/amforth.pdf in short: 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 |
From: pito <pi...@vo...> - 2011-05-25 18:42:24
|
..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 > |
From: pito <pi...@vo...> - 2011-05-25 19:36:14
|
When put into dict_appl.inc: C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\words/n_to_r.asm(23): error: Relative branch out of reach C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\appl\template44_32\dict_appl.inc(6): info: 'C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\words/n_to_r.asm' included from here C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\amforth.asm(14): info: 'C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\appl\template44_32\dict_appl.inc' included from here C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\appl\template44_32\template.asm(52): info: 'C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\amforth.asm' included from here C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\words/n_r_from.asm(23): error: Relative branch out of reach ----- 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 > > > > |
From: Erich W. <ew....@na...> - 2011-05-25 20:16:25
|
Hi Pito, On 05/25/2011 09:36 PM, pito wrote: > When put into dict_appl.inc: > > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\words/n_to_r.asm(23): > error: Relative branch out of reach > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\appl\template44_32\dict_appl.inc(6): > info: > 'C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\words/n_to_r.asm' > included from here > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\amforth.asm(14): > info: > 'C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\appl\template44_32\dict_appl.inc' > included from here > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\appl\template44_32\template.asm(52): > info: 'C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\amforth.asm' > included from here > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\words/n_r_from.asm(23): > error: Relative branch out of reach Assuming that n_r_from.asm is causing the error, add this file to dict_appl_core.inc instead of dict_appl.inc. This makes the work come earlier in the code layout. If that doesn't help, change rjmp DO_NEXT to jmp_ DO_NEXT which will use a bigger address range. Cheers, Erich |
From: pito <pi...@vo...> - 2011-05-25 20:23:53
|
Erich thanks, yes I did, indeed. Therefore it could have been be compiled, however still coping with rec-float and place-rec. Spent ~5h to migrate from 4.0, still did not print any float.. ----- PŮVODNÍ ZPRÁVA ----- Od: "Erich Waelde" <ew....@na...> Komu: "Everything around amforth" <amf...@li...> Předmět: Re: [Amforth] Amforth 4.4. - issues Datum: 25.5.2011 - 22:15:52 > Hi Pito, > > On 05/25/2011 09:36 PM, pito wrote: > > When put into dict_appl.inc: > > > > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\words/n_to_r.asm(23): > > > > > error: Relative branch out of reach > > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\appl\template44_32\dict_appl.inc(6): > > > > > info: > > 'C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\words/n_to_r.asm' > > > > > included from here > > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\amforth.asm(14): > > > > > info: > > 'C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\appl\template44_32\dict_appl.inc' > > > > > included from here > > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\appl\template44_32\template.asm(52): > > > > > info: > > 'C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\amforth.asm' > > > included from here > > C:\MyCode\AVR\WINAVR\projects\AMFORTH\my_44\core\words/n_r_from.asm(23): > > > > > error: Relative branch out of reach > > Assuming that n_r_from.asm is causing the error, > add this file > to dict_appl_core.inc instead of dict_appl.inc. > This makes the > work come earlier in the code layout. If that > doesn't help, > change > rjmp DO_NEXT > to > jmp_ DO_NEXT > which will use a bigger address range. > > Cheers, > Erich > > > ------------------------------------------------------------------------------ > > vRanger cuts backup time in half-while increasing > security. > With the market-leading solution for virtual > backup and recovery, > you get blazing-fast, flexible, and affordable > data protection. > Download your free trial now. > http://p.sf.net/sfu/quest-d2dcopy1 > _______________________________________________ > Amforth-devel mailing list > Amf...@li... > https://lists.sourceforge.net/lists/listinfo/amforth-devel > -- IHNED.cz je nový, přehlednější a rychlejší. Přesvědčte se na: www.ihned.cz |
From: pito <pi...@vo...> - 2011-05-26 08:51:40
|
for time beeing this still works with 4.4: > : # bl word count >float not abort" NaN" okstate @ if postpone fliteral then ; immediate ok > # 3.444e6 fs. 3.4439998E6 ok > # 1.234e6 fs. 1.23399997E6 ok > # 123456789e10 fs. 1.23456776E18 ok > # -1.3343e-12 # 6.222E22 f* fs. -8.3020134E10 ok > # 3.44W-1 NaN > |
From: pito <pi...@vo...> - 2011-05-25 19:17:47
|
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 |
From: pito <pi...@vo...> - 2011-05-25 20:08:51
|
> .s ok > marker -fmathrec ok > .s ok > : rec-float count >float okif state @ if postpone fliteral then -1 okelse 0 ok; ok > .s 0 2011 8399 ok > There is an issue with the rec-float..P. |