[Flashforth-devel] >digit word fail?

[Thomas B. <fla...@bu...>]

Hallo,

I looking for ">digit" but found only "digit?" and "digit". Here is my log:

S FlashForth 5 PIC18F2620  01.01.2018␍␊

words:

p2+ p++ pc@ @p hi d. ud. d> d< d= d0< d0= dinvert d2* d2/ d- d+ dabs
?dnegate dnegate s>d rdrop endit next for in, inline repeat while again
until begin else then if until, again, begin, else, then, if, not, nc,
nz, z, br? dump .s words >pr .id ms ticks s0 latest state bl 2- ['] -@ ;
:noname : ] [ lst does> postpone create cr [char] ( char ' abort" ?abort
?abort? abort prompt quit true false .st inlined immediate shb interpret
'source >in tiu tib ti# number? >number a> >a ud/mod ud* sign? *digit?*
find immed? (f) c>n n>c @+ c@+ place cmove word parse \ /string source
user base pad hp task ulink bin hex decimal . u.r u. sign #> #s #
*digit* <# hold up min max ?negate tuck nip / u*/mod u/ * u/mod um/mod
um* 'key? 'key 'emit p+ pc! p! p@ r>p !p>r !p u> u< > < = 0< 0= <>
within +! 2/ 2* >body 2+ 1- 1+ negate invert xor or and - m+ + abs dup
r@ r> >r rot over swap drop allot ." ," s" (s" type accept 1 umax umin
spaces space 2swap 2dup 2drop 2! 2@ cf, chars char+ cells cell+ aligned
align cell c, , here dp ram eeprom flash c@ @ c! ! sp@ 2constant
constant co: 2variable variable @ex execute key? key emit ver warm empty
btfss, btfsc, bsf, bcf, bra, rcall, call, goto, br3 br2 as3 as1 rshift
lshift ic, i, operator Fcy mtst mclr mset iflush pause turnkey is to
defer value cwd u1- u1+ fl+ fl- >tblp literal int! ;i di ei scan skip n=
rx1? rx1 tx1 i] [i andlw, movf, w, a, load busy idle exit 

Is that an error?

Greetings Thomas