Compatibilite avec Visual C++ version 6
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@7660 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02master
parent
86fcc212e7
commit
b3fb8243f8
|
@ -343,7 +343,11 @@ CAMLexport void caml_expand_command_line(int * argcp, char *** argvp)
|
|||
int caml_read_directory(char * dirname, struct ext_table * contents)
|
||||
{
|
||||
char * template;
|
||||
#if _MSC_VER <= 1200
|
||||
int h;
|
||||
#else
|
||||
intptr_t h;
|
||||
#endif
|
||||
struct _finddata_t fileinfo;
|
||||
char * p;
|
||||
|
||||
|
|
|
@ -28,6 +28,10 @@ extern int caml_ba_element_size[]; /* from bigarray_stubs.c */
|
|||
|
||||
static void caml_ba_sys_error(void);
|
||||
|
||||
#ifndef INVALID_SET_FILE_POINTER
|
||||
#define INVALID_SET_FILE_POINTER (-1)
|
||||
#endif
|
||||
|
||||
static __int64 caml_ba_set_file_pointer(HANDLE h, __int64 dist, DWORD mode)
|
||||
{
|
||||
LARGE_INTEGER i;
|
||||
|
|
Loading…
Reference in New Issue