Thread: Re: [Flashforth-devel] FF50 dspic33 - some missing words for fp
Brought to you by:
oh2aun
Menu
▾
▴
flashforth-devel
|
From: Mikael N. <mik...@pp...> - 2014-07-12 15:40:32
|
<div style="font-size:10pt;"><p style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;">: fconstant 2constant ;</p><p style="margin-top:0;margin-bottom:0;">: fliteral swap literal literal ;</p><p style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;">Simple :-)</p><p style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;">Mike</p><p style="margin-top:0;margin-bottom:0;"> </p><div><signature_tag><p style="margin-top:0;margin-bottom:0;">Sent from my LG Mobile</p></signature_tag></div><p id="last_enter" style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;">------ Original message------</p> <p style="margin-top:0;margin-bottom:0;"><b>From: </b>pito<pi...@vo...></p><p style="margin-top:0;margin-bottom:0;"><b>Date: </b>Sat, 12/07/2014 17:05</p><p style="margin-top:0;margin-bottom:0;"><b>To: </b>flashforth-devel;</p><p style="margin-top:0;margin-bottom:0;"><b>Subject:</b>Re: [Flashforth-devel] FF50 dspic33 - some missing words for fp</p><p style="margin-top:0;margin-bottom:0;"> </p><pre>The !i and @i are used in: : fconstant ( f -- ) create , , does> dup @i swap 1+ @i swap ; : (fliteral) ( -- f ) r@ 1+ @i r@ @i r> 2 + >r ; : fliteral ( f -- ) compile (fliteral) , , ; immediate : set-precision ( u -- ) abs [ ' precision 1+ ] literal !i ; The nop could be: : nop 0= ; What I miss is "compile" used in fliteral above, and sp0 and number. Maybe there is a workaround.. P. ______________________________________________________________ > Od: "pito" <pi...@vo...> > Komu: "flashforth-devel" <fla...@li...> > Datum: 12.07.2014 15:05 > Předmět: FF50 dspic33 - some missing words for fp > >I am trying to load the Leon's fp library, which may work "as-is". We do not need recogniser for the initial experiments, as we can enter the fp numbers as doubles. >I missed a few words there ie. ?dup 2>r 2r> which I added, still need the equivalents for >@i i !i compile not sp0 size number > >BTW where I can set the number of chars the FF50 reads from input?? It seems it does 75 only (even the rx buffer is 80 now)? >How can I increase the number to at least 80? >P. > ------------------------------------------------------------------------------ _______________________________________________ Flashforth-devel mailing list Fla...@li... https://lists.sourceforge.net/lists/listinfo/flashforth-devel </pre></div> |
|
From: Mikael N. <mik...@pp...> - 2014-07-12 15:53:30
|
<div style="font-size:10pt;"><p style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;">Just increase the tibsize in the config file.</p><p style="margin-top:0;margin-bottom:0;">Mike</p><div><signature_tag><p style="margin-top:0;margin-bottom:0;">Sent from my LG Mobile</p></signature_tag></div><p id="last_enter" style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;">------ Original message------</p> <p style="margin-top:0;margin-bottom:0;"><b>From: </b>pito<pi...@vo...></p><p style="margin-top:0;margin-bottom:0;"><b>Date: </b>Sat, 12/07/2014 16:29</p><p style="margin-top:0;margin-bottom:0;"><b>To: </b>flashforth-devel;</p><p style="margin-top:0;margin-bottom:0;"><b>Subject:</b>[Flashforth-devel] FF50 dspic33 - some missing words for fp</p><p style="margin-top:0;margin-bottom:0;"> </p><pre>I am trying to load the Leon's fp library, which may work "as-is". We do not need recogniser for the initial experiments, as we can enter the fp numbers as doubles. I missed a few words there ie. ?dup 2>r 2r> which I added, still need the equivalents for @i i !i compile not sp0 size number BTW where I can set the number of chars the FF50 reads from input?? It seems it does 75 only (even the rx buffer is 80 now)? How can I increase the number to at least 80? P. ------------------------------------------------------------------------------ _______________________________________________ Flashforth-devel mailing list Fla...@li... https://lists.sourceforge.net/lists/listinfo/flashforth-devel </pre></div> |
|
From: pito <pi...@vo...> - 2014-07-12 16:18:40
|
Thanks Mike, tibsize increased to 128.. Interestingly I get following ? when loading (no errors before that) : fliteral swap literal literal ; ok<#,ram> SP ? why? and : fmakesignificand ( d -- f-with-exponent=-127 ) ? does it mean the word name is too long? P. ______________________________________________________________ > Od: Mikael Nordman <mik...@pp...> > Komu: <fla...@li...> > Datum: 12.07.2014 17:53 > Předmět: Re: [Flashforth-devel] FF50 dspic33 - some missing words for fp > >Just increase the tibsize in the config file. > >Mike > >Sent from my LG Mobile > >------ Original message------ > >From: pito > >Date: Sat, 12/07/2014 16:29 > >To: flashforth-devel; > >Subject:[Flashforth-devel] FF50 dspic33 - some missing words for fp > >I am trying to load the Leon's fp library, which may work "as-is". We do not need recogniser for the initial experiments, as we can enter the fp numbers as doubles. I missed a few words there ie. ?dup 2>r 2r> which I added, still need the equivalents for @i i !i compile not sp0 size number BTW where I can set the number of chars the FF50 reads from input?? It seems it does 75 only (even the rx buffer is 80 now)? How can I increase the number to at least 80? P. ------------------------------------------------------------------------------ _______________________________________________ Flashforth-devel mailing list Fla...@li... https://lists.sourceforge.net/lists/listinfo/flashforth-devel > >---------- > >------------------------------------------------------------------------------ > > >---------- > >_______________________________________________ >Flashforth-devel mailing list >Fla...@li... >https://lists.sourceforge.net/lists/listinfo/flashforth-devel > |
|
From: Mikael N. <mik...@pp...> - 2014-07-12 18:51:25
|
<div style="font-size:10pt;"><p style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;">Literal is immediate.</p><p style="margin-top:0;margin-bottom:0;">You have to postpone it.</p><p style="margin-top:0;margin-bottom:0;">Max word lenght is 15 chars.</p><p style="margin-top:0;margin-bottom:0;">Mike</p><div><signature_tag><p style="margin-top:0;margin-bottom:0;">Sent from my LG Mobile</p></signature_tag></div><p id="last_enter" style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;"> </p><p style="margin-top:0;margin-bottom:0;">------ Original message------</p> <p style="margin-top:0;margin-bottom:0;"><b>From: </b>pito<pi...@vo...></p><p style="margin-top:0;margin-bottom:0;"><b>Date: </b>Sat, 12/07/2014 19:18</p><p style="margin-top:0;margin-bottom:0;"><b>To: </b>Mikael Nordman;flashforth-devel;</p><p style="margin-top:0;margin-bottom:0;"><b>Subject:</b>Re: [Flashforth-devel] FF50 dspic33 - some missing words for fp</p><p style="margin-top:0;margin-bottom:0;"> </p><pre>Thanks Mike, tibsize increased to 128.. Interestingly I get following ? when loading (no errors before that) : fliteral swap literal literal ; ok<#,ram> SP ? why? and : fmakesignificand ( d -- f-with-exponent=-127 ) ? does it mean the word name is too long? P. ______________________________________________________________ > Od: Mikael Nordman <mik...@pp...> > Komu: <fla...@li...> > Datum: 12.07.2014 17:53 > Předmět: Re: [Flashforth-devel] FF50 dspic33 - some missing words for fp > >Just increase the tibsize in the config file. > >Mike > >Sent from my LG Mobile > >------ Original message------ > >From: pito > >Date: Sat, 12/07/2014 16:29 > >To: flashforth-devel; > >Subject:[Flashforth-devel] FF50 dspic33 - some missing words for fp > >I am trying to load the Leon's fp library, which may work "as-is". We do not need recogniser for the initial experiments, as we can enter the fp numbers as doubles. I missed a few words there ie. ?dup 2>r 2r> which I added, still need the equivalents for @i i !i compile not sp0 size number BTW where I can set the number of chars the FF50 reads from input?? It seems it does 75 only (even the rx buffer is 80 now)? How can I increase the number to at least 80? P. ------------------------------------------------------------------------------ _______________________________________________ Flashforth-devel mailing list Fla...@li... https://lists.sourceforge.net/lists/listinfo/flashforth-devel > >---------- > >------------------------------------------------------------------------------ > > >---------- > >_______________________________________________ >Flashforth-devel mailing list >Fla...@li... >https://lists.sourceforge.net/lists/listinfo/flashforth-devel > </pre></div> |
|
From: pito <pi...@vo...> - 2014-07-12 15:50:35
|
Yea, I've tried it with : : fconstant 2constant ; : fvariable 2variable ; : fliteral literal literal ; I missed the swap.. Now it seems the "number" and sp0 is what I miss.. (among others I already found).. P. ______________________________________________________________ > Od: Mikael Nordman <mik...@pp...> > Komu: <fla...@li...> > Datum: 12.07.2014 17:40 > Předmět: Re: [Flashforth-devel] FF50 dspic33 - some missing words for fp > >: fconstant 2constant ; > >: fliteral swap literal literal ; > >Simple :-) > >Mike > >Sent from my LG Mobile > >------ Original message------ > >From: pito > >Date: Sat, 12/07/2014 17:05 > >To: flashforth-devel; > >Subject:Re: [Flashforth-devel] FF50 dspic33 - some missing words for fp > >The !i and @i are used in: : fconstant ( f -- ) create , , does> dup @i swap 1+ @i swap ; : (fliteral) ( -- f ) r@ 1+ @i r@ @i r> 2 + >r ; : fliteral ( f -- ) compile (fliteral) , , ; immediate : set-precision ( u -- ) abs [ ' precision 1+ ] literal !i ; The nop could be: : nop 0= ; What I miss is "compile" used in fliteral above, and sp0 and number. Maybe there is a workaround.. P. ______________________________________________________________ > Od: "pito" > Komu: "flashforth-devel" > Datum: 12.07.2014 15:05 > Předmět: FF50 dspic33 - some missing words for fp > >I am trying to load the Leon's fp library, which may work "as-is". We do not need recogniser for the initial experiments, as we can enter the fp numbers as doubles. >I missed a few words there ie. ?dup 2>r 2r> which I added, still need the equivalents for >@i i !i compile not sp0 size number > >BTW where I can set the number of chars the FF50 reads from input?? It seems it does 75 only (even the rx buffer is 80 no w)? >How can I increase the number to at least 80? >P. > ------------------------------------------------------------------------------ _______________________________________________ Flashforth-devel mailing list Fla...@li... https://lists.sourceforge.net/lists/listinfo/flashforth-devel > >---------- > >------------------------------------------------------------------------------ > > >---------- > >_______________________________________________ >Flashforth-devel mailing list >Fla...@li... >https://lists.sourceforge.net/lists/listinfo/flashforth-devel > |
×
Want the latest updates on software, tech news, and AI?
Get latest updates about software, tech news, and AI from SourceForge directly in your inbox once a month.
Thanks for helping keep SourceForge clean.
X