Re: [Flashforth-devel] FF50 dspic33 - some missing words for fp

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

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
>