git.gag.com Git - debian/pforth/blob - csrc/pf_win32.h

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