|
version 1.2, 2006/10/28 08:44:25
|
version 1.3, 2007/02/09 21:33:11
|
|
Line 22 require ./tester.fs
|
Line 22 require ./tester.fs
|
| decimal |
decimal |
| |
|
| \ division by zero |
\ division by zero |
| { 1 0 ' / catch -> 1 0 -10 } |
{ 1 0 ' / catch 0= -> 1 0 false } |
| { 1 0 ' mod catch -> 1 0 -10 } |
{ 1 0 ' mod catch 0= -> 1 0 false } |
| { 1 0 ' /mod catch -> 1 0 -10 } |
{ 1 0 ' /mod catch 0= -> 1 0 false } |
| { 1 1 0 ' */mod catch -> 1 1 0 -10 } |
{ 1 1 0 ' */mod catch 0= -> 1 1 0 false } |
| { 1 1 0 ' */ catch -> 1 1 0 -10 } |
{ 1 1 0 ' */ catch 0= -> 1 1 0 false } |
| { 1. 0 ' fm/mod catch -> 1. 0 -10 } |
{ 1. 0 ' fm/mod catch 0= -> 1. 0 false } |
| { 1. 0 ' sm/rem catch -> 1. 0 -10 } |
{ 1. 0 ' sm/rem catch 0= -> 1. 0 false } |
| { 1. 0 ' um/mod catch -> 1. 0 -10 } |
{ 1. 0 ' um/mod catch 0= -> 1. 0 false } |
| |
|
| \ division overflow |
\ division overflow |
| environment-wordlist >order |
environment-wordlist >order |
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to gforth-nofast.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / test