| 1 | /* @(#) pf_win32.h 98/01/26 1.2 */\r |
| 2 | #ifndef _pf_win32_h\r |
| 3 | #define _pf_win32_h\r |
| 4 | \r |
| 5 | #include <conio.h>\r |
| 6 | \r |
| 7 | /***************************************************************\r |
| 8 | ** WIN32 dependant include file for PForth, a Forth based on 'C'\r |
| 9 | **\r |
| 10 | ** Author: Phil Burk\r |
| 11 | ** Copyright 1994 3DO, Phil Burk, Larry Polansky, David Rosenboom\r |
| 12 | **\r |
| 13 | ** The pForth software code is dedicated to the public domain,\r |
| 14 | ** and any third party may reproduce, distribute and modify\r |
| 15 | ** the pForth software code or any derivative works thereof\r |
| 16 | ** without any compensation or license. The pForth software\r |
| 17 | ** code is provided on an "as is" basis without any warranty\r |
| 18 | ** of any kind, including, without limitation, the implied\r |
| 19 | ** warranties of merchantability and fitness for a particular\r |
| 20 | ** purpose and their equivalents under the laws of any jurisdiction.\r |
| 21 | **\r |
| 22 | ***************************************************************/\r |
| 23 | \r |
| 24 | /* Include as PF_USER_INC2 for PCs */\r |
| 25 | \r |
| 26 | /* Modify some existing defines. */\r |
| 27 | \r |
| 28 | /*\r |
| 29 | ** The PC will insert LF characters into the dictionary files unless\r |
| 30 | ** we use "b" mode!\r |
| 31 | */\r |
| 32 | #undef PF_FAM_CREATE\r |
| 33 | #define PF_FAM_CREATE ("wb+")\r |
| 34 | \r |
| 35 | #undef PF_FAM_OPEN_RO\r |
| 36 | #define PF_FAM_OPEN_RO ("rb")\r |
| 37 | \r |
| 38 | #undef PF_FAM_OPEN_RW\r |
| 39 | #define PF_FAM_OPEN_RW ("rb+")\r |
| 40 | \r |
| 41 | #endif /* _pf_win32_h */\r |