Compatibilite avec Visual C++ version 6

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@7660 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Xavier Leroy 2006-10-01 15:40:28 +00:00
parent 86fcc212e7
commit b3fb8243f8
2 changed files with 8 additions and 0 deletions

View File

@ -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;

View File

@ -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;