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

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

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