FileStream.st
changeset 10342 58ce3aabaa4b
parent 9025 e9fff455ecfb
child 10345 f6d031b8edcb
equal deleted inserted replaced
10341:5138e7faf10b 10342:58ce3aabaa4b
    42 
    42 
    43 #endif /* not transputer */
    43 #endif /* not transputer */
    44 
    44 
    45 #ifdef hpux
    45 #ifdef hpux
    46 # define fileno(f)      ((f->__fileH << 8) | (f->__fileL))
    46 # define fileno(f)      ((f->__fileH << 8) | (f->__fileL))
    47 #endif
       
    48 
       
    49 #ifndef SEEK_SET
       
    50 # define SEEK_SET       0
       
    51 #endif
       
    52 #ifndef SEEK_CUR
       
    53 # define SEEK_CUR       1
       
    54 #endif
       
    55 #ifndef SEEK_END
       
    56 # define SEEK_END       2
       
    57 #endif
    47 #endif
    58 
    48 
    59 #ifdef __VMS__
    49 #ifdef __VMS__
    60 # include <rms.h>
    50 # include <rms.h>
    61 #endif
    51 #endif
    79 # undef Signal
    69 # undef Signal
    80 # undef Delay
    70 # undef Delay
    81 # undef Context
    71 # undef Context
    82 # undef Message
    72 # undef Message
    83 # undef Process
    73 # undef Process
       
    74 # undef Processor
    84 
    75 
    85 # define NOATOM
    76 # define NOATOM
    86 # define NOGDICAPMASKS
    77 # define NOGDICAPMASKS
    87 # define NOMETAFILE
    78 # define NOMETAFILE
    88 # define NOMINMAX
    79 # define NOMINMAX
    95 //# define NOMCX
    86 //# define NOMCX
    96 # define WIN32_LEAN_AND_MEAN
    87 # define WIN32_LEAN_AND_MEAN
    97 
    88 
    98 # include <windows.h>
    89 # include <windows.h>
    99 # include <winsock.h> /* */
    90 # include <winsock.h> /* */
   100 # include <io.h>
       
   101 
    91 
   102 # if !defined(__BORLANDC__)
    92 # if !defined(__BORLANDC__)
       
    93 #  define lseek _lseek
   103 #  define stat _stat
    94 #  define stat _stat
       
    95 #  define MAXPATHLEN 1024
       
    96 # else
       
    97 #  include <io.h>
   104 # endif
    98 # endif
   105 
    99 
   106 # ifdef __DEF_Array
   100 # ifdef __DEF_Array
   107 #  define Array __DEF_Array
   101 #  define Array __DEF_Array
   108 # endif
   102 # endif
   139 # ifdef __DEF_Message
   133 # ifdef __DEF_Message
   140 #  define Message __DEF_Message
   134 #  define Message __DEF_Message
   141 # endif
   135 # endif
   142 # ifdef __DEF_Process
   136 # ifdef __DEF_Process
   143 #  define Process __DEF_Process
   137 #  define Process __DEF_Process
       
   138 # endif
       
   139 # ifdef __DEF_Processor
       
   140 #  define Processor __DEF_Processor
   144 # endif
   141 # endif
   145 
   142 
   146 # define INT int
   143 # define INT int
   147 
   144 
   148 # ifndef DO_WRAP_CALLS
   145 # ifndef DO_WRAP_CALLS
   168 #else /* not WIN32 */
   165 #else /* not WIN32 */
   169 # define HFILE FILE *
   166 # define HFILE FILE *
   170 #endif /* ! WIN32 */
   167 #endif /* ! WIN32 */
   171 
   168 
   172 #include "stxOSDefs.h"
   169 #include "stxOSDefs.h"
       
   170 
       
   171 #ifndef SEEK_SET
       
   172 # define SEEK_SET       0
       
   173 #endif
       
   174 #ifndef SEEK_CUR
       
   175 # define SEEK_CUR       1
       
   176 #endif
       
   177 #ifndef SEEK_END
       
   178 # define SEEK_END       2
       
   179 #endif
   173 
   180 
   174 %}
   181 %}
   175 ! !
   182 ! !
   176 
   183 
   177 !FileStream class methodsFor:'documentation'!
   184 !FileStream class methodsFor:'documentation'!
  1447 ! !
  1454 ! !
  1448 
  1455 
  1449 !FileStream class methodsFor:'documentation'!
  1456 !FileStream class methodsFor:'documentation'!
  1450 
  1457 
  1451 version
  1458 version
  1452     ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.122 2005-12-19 16:14:22 cg Exp $'
  1459     ^ '$Header: /cvs/stx/stx/libbasic/FileStream.st,v 1.123 2007-01-19 00:03:12 stefan Exp $'
  1453 ! !
  1460 ! !
  1454 
  1461 
  1455 FileStream initialize!
  1462 FileStream initialize!