|
From: pito <pi...@vo...> - 2010-08-27 21:03:40
|
Hi Leon, I've tried to upload to my new 1284p, but getting this error: ..... > : f/ ( f1 f2 -- f1/f2 ) okfdup f0= abort" division by zero " okfzeroexponent >r ( f1 f2, R: n2 ) okfswap fzeroexponent r> - >r fswap ( f1 f2, R: n1-n2 ) okf0 frot frot ( sum remainder divisor, R: exponent ) ok[ 1 s>f ] frot frot ( sum toadd remainder divisor, R: exponent ) ^ ?? -13 8 > 25 0 do ok > fover f0= if leave then <<<<<<< here it crashed so reset was > required > Any prerequisite needed? Pito |