![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to errore.fs CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / kernel|
Return to errore.fs CVS log | Up to [gforth] / gforth / kernel |
| version 1.17, 2012/06/23 20:38:01 | version 1.19, 2012/08/09 23:58:53 |
|---|---|
| Line 38 decimal | Line 38 decimal |
| has? OS [IF] | has? OS [IF] |
| : >stderr ( -- ) | : >stderr ( -- ) |
| r> outfile-id >r stderr to outfile-id | r> outfile-id >r debug-fid to outfile-id |
| >exec r> to outfile-id ; | >exec r> to outfile-id ; |
| [THEN] | [THEN] |