![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to gforth.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / test|
Return to gforth.fs CVS log | Up to [gforth] / gforth / test |
| version 1.15, 2007/12/31 18:40:26 | version 1.17, 2009/12/31 15:32:36 |
|---|---|
| Line 1 | Line 1 |
| \ test some gforth extension words | \ test some gforth extension words |
| \ Copyright (C) 2003,2004,2005,2006,2007 Free Software Foundation, Inc. | \ Copyright (C) 2003,2004,2005,2006,2007,2009 Free Software Foundation, Inc. |
| \ This file is part of Gforth. | \ This file is part of Gforth. |
| Line 87 decimal | Line 87 decimal |
| { -5 try-test3 -> 10 } | { -5 try-test3 -> 10 } |
| { 5 try-test3 -> 6 } | { 5 try-test3 -> 6 } |
| \ fcopysign | |
| t{ 5e 1e fcopysign -> 5e }t | |
| t{ -5e 1e fcopysign -> 5e }t | |
| t{ 5e -1e fcopysign -> -5e }t | |
| t{ -5e -1e fcopysign -> -5e }t | |
| \ tests involving -0e? |