mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-02 15:40:55 -08:00
Code Issues Projects Releases Packages Wiki Activity

Fixes for mingw32

Browse source
This commit is contained in:
jjgarcia 2004-11-23 10:50:36 +00:00
parent 29989cb461
commit 72b21aa289
2 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/h/external.h
View file

@ -1432,9 +1432,6 @@ extern cl_object cl_file_write_date(cl_object file);
extern cl_object cl_file_author(cl_object file);
extern cl_object si_file_kind(cl_object pathname, cl_object follow_links);
extern cl_object si_getcwd(void);
#ifdef _MSC_VER
extern cl_object si_get_library_pathname(void);
#endif
extern cl_object si_chdir _ARGS((cl_narg narg, cl_object directory, ...));
extern cl_object si_mkdir(cl_object directory, cl_object mode);
extern cl_object cl_directory _ARGS((cl_narg narg, cl_object directory, ...));

7
src/h/internal.h
View file

@ -169,6 +169,13 @@ extern cl_fixnum ecl_runtime(void);
extern bool ecl_interrupt_enable;
/* unixfsys.d */
#if defined(_MSC_VER) || defined(mingw32)
extern cl_object si_get_library_pathname(void);
#endif
#ifdef __cplusplus
}
#endif