summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 1f85f5e)
raw | patch | inline | side by side (parent: 1f85f5e)
| author | DeaDDooMER <deaddoomer@deadsoftware.ru> | |
| Sun, 16 Jun 2019 13:16:57 +0000 (16:16 +0300) | ||
| committer | DeaDDooMER <deaddoomer@deadsoftware.ru> | |
| Sun, 16 Jun 2019 13:16:57 +0000 (16:16 +0300) |
70 files changed:
index ecd46c387609acb68e4b8ca1f9101d04454a88d9..d466d2773aa85ecb1d7c2f6331ab7cbb6c455f21 100755 (executable)
--- a/make.sh
+++ b/make.sh
### Compile POSIX bindings ###
###________________________###
- case "$_system" in
- linux)
- compile C99/Mod/types.cp \
- C99/Mod/sys_types.cp \
- C99/Mod/stdlib.cp C99/Mod/stdio.cp C99/Mod/unistd.cp \
- C99/Mod/dirent.cp C99/Mod/locale.cp C99/Mod/time.cp \
- C99/Mod/sys_stat.cp C99/Mod/fcntl.cp C99/Mod/errno.cp \
- C99/Mod/iconv.cp C99/Mod/wctype.cp C99/Mod/sys_mman.cp \
- C99/Mod/dlfcn.cp C99/Mod/signal.cp C99/Mod/setjmp.cp \
- C99/Mod/libgen.cp \
- C99/Mod/macro.cp
- ;;
- esac
+ if $_useposix; then
+ compile Posix/Mod/Ctypes.cp \
+ Posix/Mod/Csys_types.cp \
+ Posix/Mod/Cstdlib.cp Posix/Mod/Cstdio.cp Posix/Mod/Cunistd.cp \
+ Posix/Mod/Cdirent.cp Posix/Mod/Clocale.cp Posix/Mod/Ctime.cp \
+ Posix/Mod/Csys_stat.cp Posix/Mod/Cfcntl.cp Posix/Mod/Cerrno.cp \
+ Posix/Mod/Ciconv.cp Posix/Mod/Cwctype.cp Posix/Mod/Csys_mman.cp \
+ Posix/Mod/Cdlfcn.cp Posix/Mod/Csignal.cp Posix/Mod/Csetjmp.cp \
+ Posix/Mod/Clibgen.cp \
+ Posix/Mod/Cmacro.cp
+ fi
###^^^^^^^^^^^^^^^^^^^^^^^^^^^^###
### Compile BlackBox Framework ###
fi
link cpc486 \
- C99types C99macro \
+ PosixCtypes PosixCmacro \
Kernel Console Files Dates Math Strings Services Log \
HostLang HostConsole HostFiles HostDates DswLog $_debug_module \
DevCPM DevCPT DevCPS DevCPB DevCPP DevCPE DevCPH \
DswDocuments DswCompiler486Main
link cpl486 \
- C99types C99macro \
+ PosixCtypes PosixCmacro \
Kernel Console Files Math Strings Services Log \
HostLang HostConsole HostFiles DswLog $_debug_module \
Dev2LnkBase Dev2LnkChmod Dev2LnkLoad Dev2LnkWriteElf \
DswLinker486Main
link cpfront \
- C99types C99macro \
+ PosixCtypes PosixCmacro \
Kernel Console Files Dates Math Strings Services Log \
HostLang HostConsole HostFiles HostDates DswLog $_debug_module \
DevCPM DevCPT DevCPS DevCPB DevCPP DevCPE DevCPH \
diff --git a/src/cpfront/linux/486/C99/Mod/dirent.cp b/src/cpfront/linux/486/C99/Mod/dirent.cp
+++ /dev/null
@@ -1,64 +0,0 @@
-MODULE C99dirent ['dirent.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99sys_types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- PDIR* = POINTER TO DIR;
- DIR ['DIR'] = LIMITED RECORD [untagged] END;
-
- TYPE
- Pstruct_dirent* = POINTER TO struct_dirent;
- struct_dirent* ['struct dirent'] = RECORD [noalign] (* 268 *)
- d_ino*: ino_t; (* 0+4 *)
- d_name*: ARRAY [untagged] 256 OF SHORTCHAR; (* 11+256 *)
- END;
-
- TYPE
- ino_t* = C99sys_types.ino_t;
-
- PROCEDURE [ccall] alphasort* (IN a, b: Pstruct_dirent): int;
- PROCEDURE [ccall] closedir* (dirp: PDIR): int;
- PROCEDURE [ccall] dirfd* (dirp: PDIR): int;
- PROCEDURE [ccall] fdopendir* (fd: int): PDIR;
- PROCEDURE [ccall] opendir* (IN name: ARRAY [untagged] OF SHORTCHAR): PDIR;
- PROCEDURE [ccall] readdir* (dirp: PDIR): Pstruct_dirent;
- PROCEDURE [ccall] readdir_r* (dirp: PDIR; entry: Pstruct_dirent; VAR result: Pstruct_dirent): int;
- PROCEDURE [ccall] rewinddir* (dirp: PDIR);
- PROCEDURE [ccall] scandir* (IN dirp: ARRAY [untagged] OF SHORTCHAR; filter: PROCEDURE [ccall] (IN d: struct_dirent): int; compar: PROCEDURE [ccall] (IN a, b: Pstruct_dirent): int): int;
- PROCEDURE [ccall] seekdir* (dirp: PDIR; loc: long);
- PROCEDURE [ccall] telldir* (dirp: PDIR): long;
-
-END C99dirent.
diff --git a/src/cpfront/linux/486/C99/Mod/dlfcn.cp b/src/cpfront/linux/486/C99/Mod/dlfcn.cp
+++ /dev/null
@@ -1,49 +0,0 @@
-MODULE C99dlfcn ['dlfcn.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- CONST
- RTLD_LAZY* = 1;
- RTLD_NOW* = 2;
- RTLD_GLOBAL* = 256;
- RTLD_LOCAL* = 0;
-
- PROCEDURE [ccall] dlclose* (handle: C99types.Pvoid): int;
- PROCEDURE [ccall] dlerror* (): POINTER TO ARRAY [untagged] OF SHORTCHAR;
- PROCEDURE [ccall] dlopen* (IN [nil] filename: ARRAY [untagged] OF SHORTCHAR; flags: int): C99types.Pvoid;
- PROCEDURE [ccall] dlsym* (handle: C99types.Pvoid; IN symbol: ARRAY [untagged] OF SHORTCHAR): C99types.Pvoid;
-
-END C99dlfcn.
diff --git a/src/cpfront/linux/486/C99/Mod/iconv.cp b/src/cpfront/linux/486/C99/Mod/iconv.cp
+++ /dev/null
@@ -1,48 +0,0 @@
-MODULE C99iconv ['iconv.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99sys_types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- iconv_t* = INTEGER;
-
- TYPE
- size_t* = C99sys_types.size_t;
-
- PROCEDURE [ccall] iconv* (cd: iconv_t; VAR [nil] inbuf: C99types.Pvoid; VAR inbytesleft: size_t; VAR [nil] outbuf: C99types.Pvoid; VAR outbytesleft: size_t): size_t;
- PROCEDURE [ccall] iconv_open* (IN tocode, fromcode: ARRAY [untagged] OF SHORTCHAR): iconv_t;
- PROCEDURE [ccall] iconv_close* (cd: iconv_t): int;
-
-END C99iconv.
diff --git a/src/cpfront/linux/486/C99/Mod/libgen.cp b/src/cpfront/linux/486/C99/Mod/libgen.cp
+++ /dev/null
@@ -1,41 +0,0 @@
-MODULE C99libgen ['libgen.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- PROCEDURE [ccall] basename* (path: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
- PROCEDURE [ccall] dirname* (path: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
-
-END C99libgen.
diff --git a/src/cpfront/linux/486/C99/Mod/locale.cp b/src/cpfront/linux/486/C99/Mod/locale.cp
+++ /dev/null
@@ -1,75 +0,0 @@
-MODULE C99locale ['locale.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- Pstruct_lconv* = POINTER TO struct_lconv;
- struct_lconv ['struct lconv'] = LIMITED RECORD [untagged] END;
-
- CONST
- LC_ALL* = 6;
- LC_COLLATE* = 3;
- LC_CTYPE* = 0;
- LC_MESSAGES* = 5;
- LC_MONETARY* = 4;
- LC_NUMERIC* = 1;
- LC_TIME* = 2;
-
- CONST
- LC_COLLATE_MASK* = 8;
- LC_CTYPE_MASK* = 1;
- LC_MESSAGES_MASK* = 32;
- LC_MONETARY_MASK* = 16;
- LC_NUMERIC_MASK* = 2;
- LC_TIME_MASK* = 4;
-
- CONST
- LC_ALL_MASK* = 8127;
-
- CONST
- LC_GLOBAL_LOCALE* = -1;
-
- TYPE
- locale_t* = INTEGER;
-
- PROCEDURE [ccall] duplocale* (locobj: locale_t): locale_t;
- PROCEDURE [ccall] freelocale* (locobj: locale_t);
- PROCEDURE [ccall] localeconv* (): Pstruct_lconv;
- PROCEDURE [ccall] newlocale* (category_mask: int; IN locale: ARRAY [untagged] OF SHORTCHAR; base: locale_t): locale_t;
- PROCEDURE [ccall] setlocale* (category: int; IN [nil] locale: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
- PROCEDURE [ccall] uselocale* (newloc: locale_t): locale_t;
-
-END C99locale.
diff --git a/src/cpfront/linux/486/C99/Mod/macro.cp b/src/cpfront/linux/486/C99/Mod/macro.cp
+++ /dev/null
@@ -1,15 +0,0 @@
-MODULE C99macro;
-
- IMPORT SYSTEM, C99errno, C99sys_stat;
-
- PROCEDURE errno* (): C99errno.int;
- BEGIN
- RETURN C99errno.__errno_location()[0]
- END errno;
-
- PROCEDURE stat* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR buf: C99sys_stat.struct_stat): C99sys_stat.int;
- BEGIN
- RETURN C99sys_stat.stat(path, buf)
- END stat;
-
-END C99macro.
diff --git a/src/cpfront/linux/486/C99/Mod/setjmp.cp b/src/cpfront/linux/486/C99/Mod/setjmp.cp
+++ /dev/null
@@ -1,49 +0,0 @@
-MODULE C99setjmp ['setjmp.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- jmp_buf* = ARRAY [untagged] 156 OF BYTE;
- sigjmp_buf* = ARRAY [untagged] 156 OF BYTE;
-
- PROCEDURE [ccall] _longjmp* (IN env: jmp_buf; val: int);
- PROCEDURE [ccall] longjmp* (IN env: jmp_buf; val: int);
- PROCEDURE [ccall] siglongjmp* (IN env: sigjmp_buf; val: int);
- PROCEDURE [ccall] _setjmp* (VAR env: jmp_buf): int;
- PROCEDURE [ccall] setjmp* (VAR env: jmp_buf): int;
- PROCEDURE [ccall] sigsetjmp* (VAR env: sigjmp_buf; savesigs: int): int;
-
-END C99setjmp.
diff --git a/src/cpfront/linux/486/C99/Mod/stdio.cp b/src/cpfront/linux/486/C99/Mod/stdio.cp
+++ /dev/null
@@ -1,91 +0,0 @@
-MODULE C99stdio ['stdio.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99sys_types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- PFILE* = POINTER TO FILE;
- FILE ['FILE'] = LIMITED RECORD [untagged] END;
-
- TYPE
- fpos_t* = RECORD [noalign] _: ARRAY [untagged] 12 OF BYTE END;
-
- TYPE
- off_t* = C99sys_types.off_t;
- ssize_t* = C99sys_types.ssize_t;
-
- TYPE
- size_t* = INTEGER;
-
- TYPE
- va_list* = INTEGER;
-
- CONST
- BUFSIZ* = 8192;
- L_ctermid* = 9;
- L_tmpnam* = 20;
-
- CONST
- _IOFBF* = 0;
- _IOLBF* = 1;
- _IONBF* = 2;
-
- CONST
- SEEK_CUR* = 1;
- SEEK_END* = 2;
- SEEK_SET* = 0;
-
- CONST
- FILENAME_MAX* = 4096;
- FOPEN_MAX* = 16;
- TMP_MAX* = 238328;
-
- CONST
- EOF* = -1;
-
- PROCEDURE [ccall] fclose* (stream: PFILE): int;
- PROCEDURE [ccall] ferror* (stream: PFILE): int;
- PROCEDURE [ccall] fflush* (stream: PFILE): int;
- PROCEDURE [ccall] fopen* (IN pathname, mode: ARRAY [untagged] OF SHORTCHAR): PFILE;
- PROCEDURE [ccall] fread* (ptr: C99types.Pvoid; size, n: size_t; stream: PFILE): size_t;
- PROCEDURE [ccall] fseek* (stream: PFILE; offset: long; whence: int): int;
- PROCEDURE [ccall] ftell* (stream: PFILE): long;
- PROCEDURE [ccall] fwrite* (ptr: C99types.Pvoid; size, n: size_t; stream: PFILE): size_t;
- PROCEDURE [ccall] feof* (stream: PFILE): int;
- PROCEDURE [ccall] remove* (IN pathname: ARRAY [untagged] OF SHORTCHAR): int;
- PROCEDURE [ccall] rename* (IN old, new: ARRAY [untagged] OF SHORTCHAR): int;
- PROCEDURE [ccall] tmpfile* (): PFILE;
-
-END C99stdio.
diff --git a/src/cpfront/linux/486/C99/Mod/stdlib.cp b/src/cpfront/linux/486/C99/Mod/stdlib.cp
+++ /dev/null
@@ -1,66 +0,0 @@
-MODULE C99stdlib ['stdlib.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- CONST
- EXIT_FAILURE* = 1;
- EXIT_SUCCESS* = 0;
- RAND_MAX* = 2147483647;
-
- CONST
- MB_CUR_MAX* = 1;
-
- TYPE
- div_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
- ldiv_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
- lldiv_t* = RECORD [noalign] _: ARRAY [untagged] 16 OF BYTE END;
-
- TYPE
- size_t* = INTEGER;
- wchar_t* = INTEGER;
-
- PROCEDURE [ccall] _Exit* (status: int);
- PROCEDURE [ccall] abort* ;
- PROCEDURE [ccall] atexit* (function: PROCEDURE [ccall]): int;
- PROCEDURE [ccall] exit* (status: int);
- PROCEDURE [ccall] free* (ptr: C99types.Pvoid);
- PROCEDURE [ccall] getenv* (IN name: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
- PROCEDURE [ccall] malloc* (size: size_t): C99types.Pvoid;
- PROCEDURE [ccall] system* (IN command: ARRAY [untagged] OF SHORTCHAR): int;
- PROCEDURE [ccall] mkstemp* (VAR template: ARRAY [untagged] OF SHORTCHAR): int;
- PROCEDURE [ccall] realpath* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR [nil] resolved_path: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
-
-END C99stdlib.
diff --git a/src/cpfront/linux/486/C99/Mod/sys_mman.cp b/src/cpfront/linux/486/C99/Mod/sys_mman.cp
+++ /dev/null
@@ -1,86 +0,0 @@
-MODULE C99sys_mman ['sys/mman.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99sys_types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- CONST
- PROT_EXEC* = 4;
- PROT_NONE* = 0;
- PROT_READ* = 1;
- PROT_WRITE* = 2;
-
- CONST
- MAP_FIXED* = 16;
- MAP_PRIVATE* = 2;
- MAP_SHARED* = 1;
-
- CONST
- MS_ASYNC* = 1;
- MS_INVALIDATE* = 2;
- MS_SYNC* = 4;
-
- CONST
- MCL_CURRENT* = 1;
- MCL_FUTURE* = 2;
-
- CONST
- MAP_FAILED* = -1;
-
- CONST
- POSIX_MADV_DONTNEED* = 4;
- POSIX_MADV_NORMAL* = 0;
- POSIX_MADV_RANDOM* = 1;
- POSIX_MADV_SEQUENTIAL* = 2;
- POSIX_MADV_WILLNEED* = 3;
-
- TYPE
- mode_t* = C99sys_types.mode_t;
- off_t* = C99sys_types.off_t;
- size_t* = C99sys_types.size_t;
-
- PROCEDURE [ccall] mlock* (addr: C99types.Pvoid; len: size_t): int;
- PROCEDURE [ccall] mlockall* (flags: int): int;
- PROCEDURE [ccall] mmap* (addr: C99types.Pvoid; len: size_t; prot, flags, fildes: int; off: off_t): C99types.Pvoid;
- PROCEDURE [ccall] mprotect* (addr: C99types.Pvoid; len: size_t; prot: int): int;
- PROCEDURE [ccall] msync* (addr: C99types.Pvoid; len: size_t; flags: int): int;
- PROCEDURE [ccall] munlock* (addr: C99types.Pvoid; len: size_t): int;
- PROCEDURE [ccall] munlockall* (): int;
- PROCEDURE [ccall] munmap* (addr: C99types.Pvoid; len: size_t): int;
- PROCEDURE [ccall] posix_madvise* (addr: C99types.Pvoid; len: size_t; advice: int): int;
- PROCEDURE [ccall] posix_mem_offset* (addr: C99types.Pvoid; len: size_t; VAR off: off_t; VAR contng_len: size_t; VAR fildes: int): int;
- PROCEDURE [ccall] shm_open* (IN name: ARRAY [untagged] OF SHORTCHAR; oflag, mode: int): int;
- PROCEDURE [ccall] shm_unlink* (IN name: ARRAY [untagged] OF SHORTCHAR): int;
-
-END C99sys_mman.
diff --git a/src/cpfront/linux/486/C99/Mod/sys_types.cp b/src/cpfront/linux/486/C99/Mod/sys_types.cp
+++ /dev/null
@@ -1,75 +0,0 @@
-MODULE C99sys_types ['sys/types.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- blkcnt_t* = INTEGER;
- blksize_t* = INTEGER;
- clock_t* = INTEGER;
- clockid_t* = INTEGER;
- dev_t* = LONGINT;
- fsblkcnt_t* = INTEGER;
- fsfilcnt_t* = INTEGER;
- gid_t* = INTEGER;
- id_t* = INTEGER;
- ino_t* = INTEGER;
- key_t* = INTEGER;
- mode_t* = INTEGER;
- nlink_t* = INTEGER;
- off_t* = INTEGER;
- pid_t* = INTEGER;
- pthread_attr_t* = RECORD [noalign] _: ARRAY [untagged] 36 OF BYTE END;
- pthread_barrier_t* = RECORD [noalign] _: ARRAY [untagged] 20 OF BYTE END;
- pthread_barrierattr_t* = INTEGER;
- pthread_cond_t* = RECORD [noalign] _: ARRAY [untagged] 48 OF BYTE END;
- pthread_condattr_t* = INTEGER;
- pthread_key_t* = INTEGER;
- pthread_mutex_t* = RECORD [noalign] _: ARRAY [untagged] 24 OF BYTE END;
- pthread_mutexattr_t* = INTEGER;
- pthread_once_t* = INTEGER;
- pthread_rwlock_t* = RECORD [noalign] _: ARRAY [untagged] 32 OF BYTE END;
- pthread_rwlockattr_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
- pthread_spinlock_t* = INTEGER;
- pthread_t* = INTEGER;
- size_t* = INTEGER;
- ssize_t* = INTEGER;
- suseconds_t* = INTEGER;
- time_t* = INTEGER;
- timer_t* = INTEGER;
- uid_t* = INTEGER;
-
-
-END C99sys_types.
diff --git a/src/cpfront/linux/486/C99/Mod/wctype.cp b/src/cpfront/linux/486/C99/Mod/wctype.cp
+++ /dev/null
@@ -1,58 +0,0 @@
-MODULE C99wctype ['wctype.h'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99locale;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- wint_t* = INTEGER;
- wctype_t* = INTEGER;
-
- TYPE
- wctrans_t* = INTEGER;
-
- TYPE
- locale_t* = C99locale.locale_t;
-
- CONST
- WEOF* = -1;
-
- PROCEDURE [ccall] iswalpha* (wc: wint_t): int;
- PROCEDURE [ccall] iswdigit* (wc: wint_t): int;
- PROCEDURE [ccall] iswlower* (wc: wint_t): int;
- PROCEDURE [ccall] iswupper* (wc: wint_t): int;
- PROCEDURE [ccall] towlower* (wc: wint_t): wint_t;
- PROCEDURE [ccall] towupper* (wc: wint_t): wint_t;
-
-END C99wctype.
diff --git a/src/cpfront/linux/486/Posix/Mod/Cdirent.cp b/src/cpfront/linux/486/Posix/Mod/Cdirent.cp
--- /dev/null
@@ -0,0 +1,64 @@
+MODULE PosixCdirent ['dirent.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ PDIR* = POINTER TO DIR;
+ DIR ['DIR'] = LIMITED RECORD [untagged] END;
+
+ TYPE
+ Pstruct_dirent* = POINTER TO struct_dirent;
+ struct_dirent* ['struct dirent'] = RECORD [noalign] (* 268 *)
+ d_ino*: ino_t; (* 0+4 *)
+ d_name*: ARRAY [untagged] 256 OF SHORTCHAR; (* 11+256 *)
+ END;
+
+ TYPE
+ ino_t* = PosixCsys_types.ino_t;
+
+ PROCEDURE [ccall] alphasort* (IN a, b: Pstruct_dirent): int;
+ PROCEDURE [ccall] closedir* (dirp: PDIR): int;
+ PROCEDURE [ccall] dirfd* (dirp: PDIR): int;
+ PROCEDURE [ccall] fdopendir* (fd: int): PDIR;
+ PROCEDURE [ccall] opendir* (IN name: ARRAY [untagged] OF SHORTCHAR): PDIR;
+ PROCEDURE [ccall] readdir* (dirp: PDIR): Pstruct_dirent;
+ PROCEDURE [ccall] readdir_r* (dirp: PDIR; entry: Pstruct_dirent; VAR result: Pstruct_dirent): int;
+ PROCEDURE [ccall] rewinddir* (dirp: PDIR);
+ PROCEDURE [ccall] scandir* (IN dirp: ARRAY [untagged] OF SHORTCHAR; filter: PROCEDURE [ccall] (IN d: struct_dirent): int; compar: PROCEDURE [ccall] (IN a, b: Pstruct_dirent): int): int;
+ PROCEDURE [ccall] seekdir* (dirp: PDIR; loc: long);
+ PROCEDURE [ccall] telldir* (dirp: PDIR): long;
+
+END PosixCdirent.
diff --git a/src/cpfront/linux/486/Posix/Mod/Cdlfcn.cp b/src/cpfront/linux/486/Posix/Mod/Cdlfcn.cp
--- /dev/null
@@ -0,0 +1,49 @@
+MODULE PosixCdlfcn ['dlfcn.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ CONST
+ RTLD_LAZY* = 1;
+ RTLD_NOW* = 2;
+ RTLD_GLOBAL* = 256;
+ RTLD_LOCAL* = 0;
+
+ PROCEDURE [ccall] dlclose* (handle: PosixCtypes.Pvoid): int;
+ PROCEDURE [ccall] dlerror* (): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+ PROCEDURE [ccall] dlopen* (IN [nil] filename: ARRAY [untagged] OF SHORTCHAR; flags: int): PosixCtypes.Pvoid;
+ PROCEDURE [ccall] dlsym* (handle: PosixCtypes.Pvoid; IN symbol: ARRAY [untagged] OF SHORTCHAR): PosixCtypes.Pvoid;
+
+END PosixCdlfcn.
similarity index 55%
rename from src/native/linux/486/C99/Mod/errno.cp
rename to src/cpfront/linux/486/Posix/Mod/Cerrno.cp
index 3646dff3361ef26843435664e6a353cdee82851e..4391cfbd41c4325332913f5b46302f049c66fe46 100644 (file)
rename from src/native/linux/486/C99/Mod/errno.cp
rename to src/cpfront/linux/486/Posix/Mod/Cerrno.cp
index 3646dff3361ef26843435664e6a353cdee82851e..4391cfbd41c4325332913f5b46302f049c66fe46 100644 (file)
-MODULE C99errno ['libc.so.6'];
+MODULE PosixCerrno ['errno.h'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types;
+ IMPORT SYSTEM, PosixCtypes;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
E2BIG* = 7;
PROCEDURE [ccall] __errno_location* (): POINTER TO ARRAY [untagged] 1 OF int;
-END C99errno.
+END PosixCerrno.
similarity index 56%
rename from src/cpfront/linux/486/C99/Mod/fcntl.cp
rename to src/cpfront/linux/486/Posix/Mod/Cfcntl.cp
index 06e53682203f352cda0650169723c68c4a66068d..25c73a5623fc8db65a20e7a87fe84ae9fce9ae68 100644 (file)
rename from src/cpfront/linux/486/C99/Mod/fcntl.cp
rename to src/cpfront/linux/486/Posix/Mod/Cfcntl.cp
index 06e53682203f352cda0650169723c68c4a66068d..25c73a5623fc8db65a20e7a87fe84ae9fce9ae68 100644 (file)
-MODULE C99fcntl ['fcntl.h'];
+MODULE PosixCfcntl ['fcntl.h'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99sys_types;
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
F_DUPFD* = 0;
END;
TYPE
- mode_t* = C99sys_types.mode_t;
- off_t* = C99sys_types.off_t;
- pid_t* = C99sys_types.pid_t;
+ mode_t* = PosixCsys_types.mode_t;
+ off_t* = PosixCsys_types.off_t;
+ pid_t* = PosixCsys_types.pid_t;
PROCEDURE [ccall] creat* (IN pathname: ARRAY [untagged] OF SHORTCHAR; mode: mode_t): int;
PROCEDURE [ccall] fcntl* (fildes, cmd, arg: int): int;
PROCEDURE [ccall] posix_fadvise* (fd: int; offset, len: off_t; advice: int): int;
PROCEDURE [ccall] posix_fallocate* (fd: int; offset, len: off_t): int;
-END C99fcntl.
+END PosixCfcntl.
diff --git a/src/cpfront/linux/486/Posix/Mod/Ciconv.cp b/src/cpfront/linux/486/Posix/Mod/Ciconv.cp
--- /dev/null
@@ -0,0 +1,48 @@
+MODULE PosixCiconv ['iconv.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ iconv_t* = INTEGER;
+
+ TYPE
+ size_t* = PosixCsys_types.size_t;
+
+ PROCEDURE [ccall] iconv* (cd: iconv_t; VAR [nil] inbuf: PosixCtypes.Pvoid; VAR inbytesleft: size_t; VAR [nil] outbuf: PosixCtypes.Pvoid; VAR outbytesleft: size_t): size_t;
+ PROCEDURE [ccall] iconv_open* (IN tocode, fromcode: ARRAY [untagged] OF SHORTCHAR): iconv_t;
+ PROCEDURE [ccall] iconv_close* (cd: iconv_t): int;
+
+END PosixCiconv.
diff --git a/src/cpfront/linux/486/Posix/Mod/Clibgen.cp b/src/cpfront/linux/486/Posix/Mod/Clibgen.cp
--- /dev/null
@@ -0,0 +1,41 @@
+MODULE PosixClibgen ['libgen.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ PROCEDURE [ccall] basename* (path: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+ PROCEDURE [ccall] dirname* (path: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+
+END PosixClibgen.
diff --git a/src/cpfront/linux/486/Posix/Mod/Clocale.cp b/src/cpfront/linux/486/Posix/Mod/Clocale.cp
--- /dev/null
@@ -0,0 +1,75 @@
+MODULE PosixClocale ['locale.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ Pstruct_lconv* = POINTER TO struct_lconv;
+ struct_lconv ['struct lconv'] = LIMITED RECORD [untagged] END;
+
+ CONST
+ LC_ALL* = 6;
+ LC_COLLATE* = 3;
+ LC_CTYPE* = 0;
+ LC_MESSAGES* = 5;
+ LC_MONETARY* = 4;
+ LC_NUMERIC* = 1;
+ LC_TIME* = 2;
+
+ CONST
+ LC_COLLATE_MASK* = 8;
+ LC_CTYPE_MASK* = 1;
+ LC_MESSAGES_MASK* = 32;
+ LC_MONETARY_MASK* = 16;
+ LC_NUMERIC_MASK* = 2;
+ LC_TIME_MASK* = 4;
+
+ CONST
+ LC_ALL_MASK* = 8127;
+
+ CONST
+ LC_GLOBAL_LOCALE* = -1;
+
+ TYPE
+ locale_t* = INTEGER;
+
+ PROCEDURE [ccall] duplocale* (locobj: locale_t): locale_t;
+ PROCEDURE [ccall] freelocale* (locobj: locale_t);
+ PROCEDURE [ccall] localeconv* (): Pstruct_lconv;
+ PROCEDURE [ccall] newlocale* (category_mask: int; IN locale: ARRAY [untagged] OF SHORTCHAR; base: locale_t): locale_t;
+ PROCEDURE [ccall] setlocale* (category: int; IN [nil] locale: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+ PROCEDURE [ccall] uselocale* (newloc: locale_t): locale_t;
+
+END PosixClocale.
diff --git a/src/cpfront/linux/486/Posix/Mod/Csetjmp.cp b/src/cpfront/linux/486/Posix/Mod/Csetjmp.cp
--- /dev/null
@@ -0,0 +1,49 @@
+MODULE PosixCsetjmp ['setjmp.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ jmp_buf* = ARRAY [untagged] 156 OF BYTE;
+ sigjmp_buf* = ARRAY [untagged] 156 OF BYTE;
+
+ PROCEDURE [ccall] _longjmp* (IN env: jmp_buf; val: int);
+ PROCEDURE [ccall] longjmp* (IN env: jmp_buf; val: int);
+ PROCEDURE [ccall] siglongjmp* (IN env: sigjmp_buf; val: int);
+ PROCEDURE [ccall] _setjmp* (VAR env: jmp_buf): int;
+ PROCEDURE [ccall] setjmp* (VAR env: jmp_buf): int;
+ PROCEDURE [ccall] sigsetjmp* (VAR env: sigjmp_buf; savesigs: int): int;
+
+END PosixCsetjmp.
similarity index 60%
rename from src/cpfront/linux/486/C99/Mod/signal.cp
rename to src/cpfront/linux/486/Posix/Mod/Csignal.cp
index 7a161b583607385ca6849db2d7b0137d6d98ba35..43100cad52bed7649e09e711a7a2e829decbed41 100644 (file)
rename from src/cpfront/linux/486/C99/Mod/signal.cp
rename to src/cpfront/linux/486/Posix/Mod/Csignal.cp
index 7a161b583607385ca6849db2d7b0137d6d98ba35..43100cad52bed7649e09e711a7a2e829decbed41 100644 (file)
-MODULE C99signal ['signal.h'];
+MODULE PosixCsignal ['signal.h'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99sys_types, C99time;
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types, PosixCtime;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
SIG_DFL* = 0;
SIG_IGN* = 1;
TYPE
- pthread_t* = C99sys_types.pthread_t;
- pthread_attr_t* = C99sys_types.pthread_attr_t;
- size_t* = C99sys_types.size_t;
- uid_t* = C99sys_types.uid_t;
- pid_t* = C99sys_types.pid_t;
+ pthread_t* = PosixCsys_types.pthread_t;
+ pthread_attr_t* = PosixCsys_types.pthread_attr_t;
+ size_t* = PosixCsys_types.size_t;
+ uid_t* = PosixCsys_types.uid_t;
+ pid_t* = PosixCsys_types.pid_t;
TYPE
- struct_timespec* = C99time.struct_timespec;
+ struct_timespec* = PosixCtime.struct_timespec;
TYPE
sig_atomic_t* = INTEGER;
Punion_sigval* = POINTER TO union_sigval;
union_sigval* ['union sigval'] = RECORD [union] (* 4 *)
sival_int*: int; (* 0+4 *)
- sival_ptr*: C99types.Pvoid; (* 0+4 *)
+ sival_ptr*: PosixCtypes.Pvoid; (* 0+4 *)
END;
CONST
P_struct_sigaction* = POINTER TO _struct_sigaction;
_struct_sigaction* ['struct sigaction'] = RECORD [noalign] (* 140 *)
sa_handler*: PROCEDURE [ccall] (sig: int); (* 0+4 *)
- sa_sigaction*: PROCEDURE [ccall] (sig: int; IN siginfo: siginfo_t; context: C99types.Pvoid); (* 0+4 *)
+ sa_sigaction*: PROCEDURE [ccall] (sig: int; IN siginfo: siginfo_t; context: PosixCtypes.Pvoid); (* 0+4 *)
sa_mask*: sigset_t; (* 4+128 *)
sa_flags*: int; (* 132+4 *)
END;
struct_sigaction* ['struct sigaction'] = RECORD [noalign] (* 140 *)
handler*: RECORD [union] (* 4 *)
sa_handler*: PROCEDURE [ccall] (sig: int); (* 0+4 *)
- sa_sigaction*: PROCEDURE [ccall] (sig: int; IN siginfo: siginfo_t; context: C99types.Pvoid); (* 0+4 *)
+ sa_sigaction*: PROCEDURE [ccall] (sig: int; IN siginfo: siginfo_t; context: PosixCtypes.Pvoid); (* 0+4 *)
END; (* 0+4 *)
sa_mask*: sigset_t; (* 4+128 *)
sa_flags*: int; (* 132+4 *)
MINSIGSTKSZ* = 2048;
SIGSTKSZ* = 8192;
+ CONST
+ __NGREG* = 19;
+
TYPE
- mcontext_t* = RECORD [noalign] _: ARRAY [untagged] 88 OF BYTE END;
+ greg_t* = INTEGER;
+
+ TYPE gregset_t* = ARRAY [untagged] __NGREG OF greg_t;
+
+ TYPE
+ Pstruct__libc_fpreg* = POINTER TO struct__libc_fpreg;
+ struct__libc_fpreg* ['struct _libc_fpreg'] = RECORD [noalign] (* 10 *)
+ significand*: INTEGER; (* 0+8 *)
+ exponent*: unsigned_short_int; (* 8+2 *)
+ END;
+
+ TYPE
+ Pstruct__libc_fpstate* = POINTER TO struct__libc_fpstate;
+ struct__libc_fpstate* ['struct _libc_fpstate'] = RECORD [noalign] (* 112 *)
+ cw*: unsigned_long_int; (* 0+4 *)
+ sw*: unsigned_long_int; (* 4+4 *)
+ tag*: unsigned_long_int; (* 8+4 *)
+ ipoff*: unsigned_long_int; (* 12+4 *)
+ cssel*: unsigned_long_int; (* 16+4 *)
+ dataoff*: unsigned_long_int; (* 20+4 *)
+ datasel*: unsigned_long_int; (* 24+4 *)
+ _st*: ARRAY [untagged] 8 OF struct__libc_fpreg; (* 28+80 *)
+ status*: unsigned_long_int; (* 108+4 *)
+ END;
+
+ TYPE fpregset_t* = Pstruct__libc_fpstate;
+
+ TYPE
+ Pmcontext_t* = POINTER TO mcontext_t;
+ mcontext_t* ['mcontext_t'] = RECORD [noalign] (* 88 *)
+ gregs*: gregset_t; (* 0+76 *)
+ fpregs*: fpregset_t; (* 76+4 *)
+ oldmask*: unsigned_long_int; (* 80+4 *)
+ cr2*: unsigned_long_int; (* 84+4 *)
+ END;
TYPE
Pucontext_t* = POINTER TO ucontext_t;
ucontext_t* ['ucontext_t'] = RECORD [noalign] (* 348 *)
+ uc_flags*: unsigned_long_int; (* 0+4 *)
uc_link*: Pucontext_t; (* 4+4 *)
uc_stack*: stack_t; (* 8+12 *)
uc_mcontext*: mcontext_t; (* 20+88 *)
uc_sigmask*: sigset_t; (* 108+128 *)
+ __fpregs_mem*: struct__libc_fpstate; (* 236+112 *)
END;
TYPE
Pstack_t* = POINTER TO stack_t;
stack_t* ['stack_t'] = RECORD [noalign] (* 12 *)
- ss_sp*: C99types.Pvoid; (* 0+4 *)
+ ss_sp*: PosixCtypes.Pvoid; (* 0+4 *)
ss_flags*: int; (* 4+4 *)
ss_size*: size_t; (* 8+4 *)
END;
si_errno*: int; (* 4+4 *)
si_code*: int; (* 8+4 *)
si_pid*: pid_t; (* 12+4 *)
- si_addr*: C99types.Pvoid; (* 12+4 *)
+ si_addr*: PosixCtypes.Pvoid; (* 12+4 *)
si_band*: long; (* 12+4 *)
si_uid*: uid_t; (* 16+4 *)
si_status*: int; (* 20+4 *)
si_signo*: int; (* 0+4 *)
si_errno*: int; (* 4+4 *)
si_code*: int; (* 8+4 *)
- info*: RECORD [union] (* 24 *)
- sigill*: RECORD [noalign] (* 16 *)
- si_addr*: C99types.Pvoid; (* 12+4 *)
- END; (* 0+16 *)
- sigfpe*: RECORD [noalign] (* 16 *)
- si_addr*: C99types.Pvoid; (* 12+4 *)
- END; (* 0+16 *)
- sigsegv*: RECORD [noalign] (* 16 *)
- si_addr*: C99types.Pvoid; (* 12+4 *)
- END; (* 0+16 *)
- sigbus*: RECORD [noalign] (* 16 *)
- si_addr*: C99types.Pvoid; (* 12+4 *)
- END; (* 0+16 *)
- sigchld*: RECORD [noalign] (* 24 *)
- si_pid*: pid_t; (* 12+4 *)
- si_uid*: uid_t; (* 16+4 *)
- si_status*: int; (* 20+4 *)
- END; (* 0+24 *)
- sigpoll*: RECORD [noalign] (* 16 *)
- si_band*: long; (* 12+4 *)
- END; (* 0+16 *)
- other*: RECORD [noalign] (* 24 *)
- si_value*: union_sigval; (* 20+4 *)
- END; (* 0+24 *)
- END; (* 12+24 *)
+ info*: RECORD [union] (* 12 *)
+ sigill*: RECORD [noalign] (* 4 *)
+ si_addr*: PosixCtypes.Pvoid; (* 0+4 *)
+ END; (* 0+4 *)
+ sigfpe*: RECORD [noalign] (* 4 *)
+ si_addr*: PosixCtypes.Pvoid; (* 0+4 *)
+ END; (* 0+4 *)
+ sigsegv*: RECORD [noalign] (* 4 *)
+ si_addr*: PosixCtypes.Pvoid; (* 0+4 *)
+ END; (* 0+4 *)
+ sigbus*: RECORD [noalign] (* 4 *)
+ si_addr*: PosixCtypes.Pvoid; (* 0+4 *)
+ END; (* 0+4 *)
+ sigchld*: RECORD [noalign] (* 12 *)
+ si_pid*: pid_t; (* 0+4 *)
+ si_uid*: uid_t; (* 4+4 *)
+ si_status*: int; (* 8+4 *)
+ END; (* 0+12 *)
+ sigpoll*: RECORD [noalign] (* 4 *)
+ si_band*: long; (* 0+4 *)
+ END; (* 0+4 *)
+ other*: RECORD [noalign] (* 4 *)
+ si_value*: union_sigval; (* 0+4 *)
+ END; (* 8+4 *)
+ END; (* 12+12 *)
END;
CONST
PROCEDURE [ccall] sigwait* (IN set: sigset_t; VAR sig: int): int;
PROCEDURE [ccall] sigwaitinfo* (IN set: sigset_t; VAR [nil] info: siginfo_t): int;
-END C99signal.
+END PosixCsignal.
diff --git a/src/cpfront/linux/486/Posix/Mod/Cstdio.cp b/src/cpfront/linux/486/Posix/Mod/Cstdio.cp
--- /dev/null
@@ -0,0 +1,91 @@
+MODULE PosixCstdio ['stdio.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ PFILE* = POINTER TO FILE;
+ FILE ['FILE'] = LIMITED RECORD [untagged] END;
+
+ TYPE
+ fpos_t* = RECORD [noalign] _: ARRAY [untagged] 12 OF BYTE END;
+
+ TYPE
+ off_t* = PosixCsys_types.off_t;
+ ssize_t* = PosixCsys_types.ssize_t;
+
+ TYPE
+ size_t* = INTEGER;
+
+ TYPE
+ va_list* = INTEGER;
+
+ CONST
+ BUFSIZ* = 8192;
+ L_ctermid* = 9;
+ L_tmpnam* = 20;
+
+ CONST
+ _IOFBF* = 0;
+ _IOLBF* = 1;
+ _IONBF* = 2;
+
+ CONST
+ SEEK_CUR* = 1;
+ SEEK_END* = 2;
+ SEEK_SET* = 0;
+
+ CONST
+ FILENAME_MAX* = 4096;
+ FOPEN_MAX* = 16;
+ TMP_MAX* = 238328;
+
+ CONST
+ EOF* = -1;
+
+ PROCEDURE [ccall] fclose* (stream: PFILE): int;
+ PROCEDURE [ccall] ferror* (stream: PFILE): int;
+ PROCEDURE [ccall] fflush* (stream: PFILE): int;
+ PROCEDURE [ccall] fopen* (IN pathname, mode: ARRAY [untagged] OF SHORTCHAR): PFILE;
+ PROCEDURE [ccall] fread* (ptr: PosixCtypes.Pvoid; size, n: size_t; stream: PFILE): size_t;
+ PROCEDURE [ccall] fseek* (stream: PFILE; offset: long; whence: int): int;
+ PROCEDURE [ccall] ftell* (stream: PFILE): long;
+ PROCEDURE [ccall] fwrite* (ptr: PosixCtypes.Pvoid; size, n: size_t; stream: PFILE): size_t;
+ PROCEDURE [ccall] feof* (stream: PFILE): int;
+ PROCEDURE [ccall] remove* (IN pathname: ARRAY [untagged] OF SHORTCHAR): int;
+ PROCEDURE [ccall] rename* (IN old, new: ARRAY [untagged] OF SHORTCHAR): int;
+ PROCEDURE [ccall] tmpfile* (): PFILE;
+
+END PosixCstdio.
diff --git a/src/cpfront/linux/486/Posix/Mod/Cstdlib.cp b/src/cpfront/linux/486/Posix/Mod/Cstdlib.cp
--- /dev/null
@@ -0,0 +1,66 @@
+MODULE PosixCstdlib ['stdlib.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ CONST
+ EXIT_FAILURE* = 1;
+ EXIT_SUCCESS* = 0;
+ RAND_MAX* = 2147483647;
+
+ CONST
+ MB_CUR_MAX* = 1;
+
+ TYPE
+ div_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
+ ldiv_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
+ lldiv_t* = RECORD [noalign] _: ARRAY [untagged] 16 OF BYTE END;
+
+ TYPE
+ size_t* = INTEGER;
+ wchar_t* = INTEGER;
+
+ PROCEDURE [ccall] _Exit* (status: int);
+ PROCEDURE [ccall] abort* ;
+ PROCEDURE [ccall] atexit* (function: PROCEDURE [ccall]): int;
+ PROCEDURE [ccall] exit* (status: int);
+ PROCEDURE [ccall] free* (ptr: PosixCtypes.Pvoid);
+ PROCEDURE [ccall] getenv* (IN name: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+ PROCEDURE [ccall] malloc* (size: size_t): PosixCtypes.Pvoid;
+ PROCEDURE [ccall] system* (IN command: ARRAY [untagged] OF SHORTCHAR): int;
+ PROCEDURE [ccall] mkstemp* (VAR template: ARRAY [untagged] OF SHORTCHAR): int;
+ PROCEDURE [ccall] realpath* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR [nil] resolved_path: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+
+END PosixCstdlib.
diff --git a/src/cpfront/linux/486/Posix/Mod/Csys_mman.cp b/src/cpfront/linux/486/Posix/Mod/Csys_mman.cp
--- /dev/null
@@ -0,0 +1,86 @@
+MODULE PosixCsys_mman ['sys/mman.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ CONST
+ PROT_EXEC* = 4;
+ PROT_NONE* = 0;
+ PROT_READ* = 1;
+ PROT_WRITE* = 2;
+
+ CONST
+ MAP_FIXED* = 16;
+ MAP_PRIVATE* = 2;
+ MAP_SHARED* = 1;
+
+ CONST
+ MS_ASYNC* = 1;
+ MS_INVALIDATE* = 2;
+ MS_SYNC* = 4;
+
+ CONST
+ MCL_CURRENT* = 1;
+ MCL_FUTURE* = 2;
+
+ CONST
+ MAP_FAILED* = -1;
+
+ CONST
+ POSIX_MADV_DONTNEED* = 4;
+ POSIX_MADV_NORMAL* = 0;
+ POSIX_MADV_RANDOM* = 1;
+ POSIX_MADV_SEQUENTIAL* = 2;
+ POSIX_MADV_WILLNEED* = 3;
+
+ TYPE
+ mode_t* = PosixCsys_types.mode_t;
+ off_t* = PosixCsys_types.off_t;
+ size_t* = PosixCsys_types.size_t;
+
+ PROCEDURE [ccall] mlock* (addr: PosixCtypes.Pvoid; len: size_t): int;
+ PROCEDURE [ccall] mlockall* (flags: int): int;
+ PROCEDURE [ccall] mmap* (addr: PosixCtypes.Pvoid; len: size_t; prot, flags, fildes: int; off: off_t): PosixCtypes.Pvoid;
+ PROCEDURE [ccall] mprotect* (addr: PosixCtypes.Pvoid; len: size_t; prot: int): int;
+ PROCEDURE [ccall] msync* (addr: PosixCtypes.Pvoid; len: size_t; flags: int): int;
+ PROCEDURE [ccall] munlock* (addr: PosixCtypes.Pvoid; len: size_t): int;
+ PROCEDURE [ccall] munlockall* (): int;
+ PROCEDURE [ccall] munmap* (addr: PosixCtypes.Pvoid; len: size_t): int;
+ PROCEDURE [ccall] posix_madvise* (addr: PosixCtypes.Pvoid; len: size_t; advice: int): int;
+ PROCEDURE [ccall] posix_mem_offset* (addr: PosixCtypes.Pvoid; len: size_t; VAR off: off_t; VAR contng_len: size_t; VAR fildes: int): int;
+ PROCEDURE [ccall] shm_open* (IN name: ARRAY [untagged] OF SHORTCHAR; oflag, mode: int): int;
+ PROCEDURE [ccall] shm_unlink* (IN name: ARRAY [untagged] OF SHORTCHAR): int;
+
+END PosixCsys_mman.
diff --git a/src/cpfront/linux/486/C99/Mod/sys_stat.cp b/src/cpfront/linux/486/Posix/Mod/Csys_stat.cp
similarity index 60%
rename from src/cpfront/linux/486/C99/Mod/sys_stat.cp
rename to src/cpfront/linux/486/Posix/Mod/Csys_stat.cp
index 9b7d73a50352c2b548654b85a354ae0606d1ce54..1d7c38f8626931a56f9e3eb69be7242cd577679c 100644 (file)
rename from src/cpfront/linux/486/C99/Mod/sys_stat.cp
rename to src/cpfront/linux/486/Posix/Mod/Csys_stat.cp
index 9b7d73a50352c2b548654b85a354ae0606d1ce54..1d7c38f8626931a56f9e3eb69be7242cd577679c 100644 (file)
-MODULE C99sys_stat ['sys/stat.h'];
+MODULE PosixCsys_stat ['sys/stat.h'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99time, C99sys_types;
+ IMPORT SYSTEM, PosixCtypes, PosixCtime, PosixCsys_types;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
S_IFMT* = 61440;
UTIME_OMIT* = 1073741822;
TYPE
- blkcnt_t* = C99sys_types.blkcnt_t;
- blksize_t* = C99sys_types.blksize_t;
- dev_t* = C99sys_types.dev_t;
- ino_t* = C99sys_types.ino_t;
- mode_t* = C99sys_types.mode_t;
- nlink_t* = C99sys_types.nlink_t;
- uid_t* = C99sys_types.uid_t;
- gid_t* = C99sys_types.gid_t;
- off_t* = C99sys_types.off_t;
- time_t* = C99sys_types.time_t;
+ blkcnt_t* = PosixCsys_types.blkcnt_t;
+ blksize_t* = PosixCsys_types.blksize_t;
+ dev_t* = PosixCsys_types.dev_t;
+ ino_t* = PosixCsys_types.ino_t;
+ mode_t* = PosixCsys_types.mode_t;
+ nlink_t* = PosixCsys_types.nlink_t;
+ uid_t* = PosixCsys_types.uid_t;
+ gid_t* = PosixCsys_types.gid_t;
+ off_t* = PosixCsys_types.off_t;
+ time_t* = PosixCsys_types.time_t;
TYPE
- struct_timespec* = C99time.struct_timespec;
+ struct_timespec* = PosixCtime.struct_timespec;
TYPE
Pstruct_stat* = POINTER TO struct_stat;
PROCEDURE [ccall] umask* (mode: mode_t): mode_t;
PROCEDURE [ccall] utimensat* (dirfd: int; IN pathname: ARRAY [untagged] OF SHORTCHAR; IN times: ARRAY [untagged] 2 OF struct_timespec; flags: int): int;
-END C99sys_stat.
+END PosixCsys_stat.
diff --git a/src/cpfront/linux/486/Posix/Mod/Csys_types.cp b/src/cpfront/linux/486/Posix/Mod/Csys_types.cp
--- /dev/null
@@ -0,0 +1,75 @@
+MODULE PosixCsys_types ['sys/types.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ blkcnt_t* = INTEGER;
+ blksize_t* = INTEGER;
+ clock_t* = INTEGER;
+ clockid_t* = INTEGER;
+ dev_t* = LONGINT;
+ fsblkcnt_t* = INTEGER;
+ fsfilcnt_t* = INTEGER;
+ gid_t* = INTEGER;
+ id_t* = INTEGER;
+ ino_t* = INTEGER;
+ key_t* = INTEGER;
+ mode_t* = INTEGER;
+ nlink_t* = INTEGER;
+ off_t* = INTEGER;
+ pid_t* = INTEGER;
+ pthread_attr_t* = RECORD [noalign] _: ARRAY [untagged] 36 OF BYTE END;
+ pthread_barrier_t* = RECORD [noalign] _: ARRAY [untagged] 20 OF BYTE END;
+ pthread_barrierattr_t* = INTEGER;
+ pthread_cond_t* = RECORD [noalign] _: ARRAY [untagged] 48 OF BYTE END;
+ pthread_condattr_t* = INTEGER;
+ pthread_key_t* = INTEGER;
+ pthread_mutex_t* = RECORD [noalign] _: ARRAY [untagged] 24 OF BYTE END;
+ pthread_mutexattr_t* = INTEGER;
+ pthread_once_t* = INTEGER;
+ pthread_rwlock_t* = RECORD [noalign] _: ARRAY [untagged] 32 OF BYTE END;
+ pthread_rwlockattr_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
+ pthread_spinlock_t* = INTEGER;
+ pthread_t* = INTEGER;
+ size_t* = INTEGER;
+ ssize_t* = INTEGER;
+ suseconds_t* = INTEGER;
+ time_t* = INTEGER;
+ timer_t* = INTEGER;
+ uid_t* = INTEGER;
+
+
+END PosixCsys_types.
similarity index 68%
rename from src/cpfront/linux/486/C99/Mod/time.cp
rename to src/cpfront/linux/486/Posix/Mod/Ctime.cp
index 8db218c67898e1f1985b618340901e7b8e6f38e9..e9ece924f2de5b57b2500c4fc8fd03fac663a2fd 100644 (file)
rename from src/cpfront/linux/486/C99/Mod/time.cp
rename to src/cpfront/linux/486/Posix/Mod/Ctime.cp
index 8db218c67898e1f1985b618340901e7b8e6f38e9..e9ece924f2de5b57b2500c4fc8fd03fac663a2fd 100644 (file)
-MODULE C99time ['time.h'];
+MODULE PosixCtime ['time.h'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99sys_types, C99locale;
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types, PosixClocale;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
TYPE
- clock_t* = C99sys_types.clock_t;
- size_t* = C99sys_types.size_t;
- time_t* = C99sys_types.time_t;
- clockid_t* = C99sys_types.clockid_t;
- timer_t* = C99sys_types.timer_t;
- pid_t* = C99sys_types.pid_t;
+ clock_t* = PosixCsys_types.clock_t;
+ size_t* = PosixCsys_types.size_t;
+ time_t* = PosixCsys_types.time_t;
+ clockid_t* = PosixCsys_types.clockid_t;
+ timer_t* = PosixCsys_types.timer_t;
+ pid_t* = PosixCsys_types.pid_t;
TYPE
- locale_t* = C99locale.locale_t;
+ locale_t* = PosixClocale.locale_t;
TYPE
Pstruct_tm* = POINTER TO struct_tm;
PROCEDURE [ccall] timer_settime* (timerid: timer_t; flags: int; IN value: struct_itimerspec; VAR [nil] ovalue: struct_itimerspec): int;
PROCEDURE [ccall] tzset* ;
-END C99time.
+END PosixCtime.
similarity index 96%
rename from src/native/linux/486/C99/Mod/types.cp
rename to src/cpfront/linux/486/Posix/Mod/Ctypes.cp
index 8c86e26ceeebf4ccd433c70578040eeef2a8f102..6cdc535f8569becd6b1f4b73e7ad8b90bca5fa1f 100644 (file)
rename from src/native/linux/486/C99/Mod/types.cp
rename to src/cpfront/linux/486/Posix/Mod/Ctypes.cp
index 8c86e26ceeebf4ccd433c70578040eeef2a8f102..6cdc535f8569becd6b1f4b73e7ad8b90bca5fa1f 100644 (file)
-MODULE C99types;
+MODULE PosixCtypes;
(* generated by genposix.sh, do not modify *)
Pvoid* = INTEGER;
-END C99types.
+END PosixCtypes.
similarity index 87%
rename from src/cpfront/linux/486/C99/Mod/unistd.cp
rename to src/cpfront/linux/486/Posix/Mod/Cunistd.cp
index bda37e8c4186c2bd0a0d86b741abf5863fb7dfa4..07357b730a78b9f77a4364a8cc938cb5db49ddf8 100644 (file)
rename from src/cpfront/linux/486/C99/Mod/unistd.cp
rename to src/cpfront/linux/486/Posix/Mod/Cunistd.cp
index bda37e8c4186c2bd0a0d86b741abf5863fb7dfa4..07357b730a78b9f77a4364a8cc938cb5db49ddf8 100644 (file)
-MODULE C99unistd ['unistd.h'];
+MODULE PosixCunistd ['unistd.h'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99sys_types;
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
_POSIX_VERSION* = 200809;
_POSIX_VDISABLE* = 0;
TYPE
- size_t* = C99sys_types.size_t;
- ssize_t* = C99sys_types.ssize_t;
- uid_t* = C99sys_types.uid_t;
- gid_t* = C99sys_types.gid_t;
- off_t* = C99sys_types.off_t;
- pid_t* = C99sys_types.pid_t;
+ size_t* = PosixCsys_types.size_t;
+ ssize_t* = PosixCsys_types.ssize_t;
+ uid_t* = PosixCsys_types.uid_t;
+ gid_t* = PosixCsys_types.gid_t;
+ off_t* = PosixCsys_types.off_t;
+ pid_t* = PosixCsys_types.pid_t;
TYPE
intptr_t* = INTEGER;
PROCEDURE [ccall] pathconf* (IN path: ARRAY [untagged] OF SHORTCHAR; name: int): long;
PROCEDURE [ccall] pause* (): int;
PROCEDURE [ccall] pipe* (VAR fildes: ARRAY [untagged] 2 OF int): int;
- PROCEDURE [ccall] pread* (fildes: int; buf: C99types.Pvoid; nbyte: size_t; offset: off_t): ssize_t;
- PROCEDURE [ccall] pwrite* (fildes: int; buf: C99types.Pvoid; nbyte: size_t; offset: off_t): ssize_t;
- PROCEDURE [ccall] read* (fildes: int; buf: C99types.Pvoid; nbyte: size_t): ssize_t;
+ PROCEDURE [ccall] pread* (fildes: int; buf: PosixCtypes.Pvoid; nbyte: size_t; offset: off_t): ssize_t;
+ PROCEDURE [ccall] pwrite* (fildes: int; buf: PosixCtypes.Pvoid; nbyte: size_t; offset: off_t): ssize_t;
+ PROCEDURE [ccall] read* (fildes: int; buf: PosixCtypes.Pvoid; nbyte: size_t): ssize_t;
PROCEDURE [ccall] readlink* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR buf: ARRAY [untagged] OF SHORTCHAR; bufsize: size_t): ssize_t;
PROCEDURE [ccall] readlinkat* (fd: int; IN path: ARRAY [untagged] OF SHORTCHAR; VAR buf: ARRAY [untagged] OF SHORTCHAR; bufsize: size_t): ssize_t;
PROCEDURE [ccall] rmdir* (IN path: ARRAY [untagged] OF SHORTCHAR): int;
PROCEDURE [ccall] setsid* (): pid_t;
PROCEDURE [ccall] setuid* (uid: uid_t): int;
PROCEDURE [ccall] sleep* (seconds: unsigned): unsigned;
- PROCEDURE [ccall] swab* (from, to: C99types.Pvoid; n: ssize_t);
+ PROCEDURE [ccall] swab* (from, to: PosixCtypes.Pvoid; n: ssize_t);
PROCEDURE [ccall] symlink* (IN path1, path2: ARRAY [untagged] OF SHORTCHAR): int;
PROCEDURE [ccall] symlinkat* (IN path1: ARRAY [untagged] OF SHORTCHAR; fd: int; IN path2: ARRAY [untagged] OF SHORTCHAR): int;
PROCEDURE [ccall] sync* ;
PROCEDURE [ccall] ttyname_r* (fd: int; VAR buf: ARRAY [untagged] OF SHORTCHAR; buflen: size_t): int;
PROCEDURE [ccall] unlink* (IN path: ARRAY [untagged] OF SHORTCHAR): int;
PROCEDURE [ccall] unlinkat* (fd: int; IN path: ARRAY [untagged] OF SHORTCHAR; flag: int): int;
- PROCEDURE [ccall] write* (fildes: int; buf: C99types.Pvoid; nbyte: size_t): int;
+ PROCEDURE [ccall] write* (fildes: int; buf: PosixCtypes.Pvoid; nbyte: size_t): int;
-END C99unistd.
+END PosixCunistd.
diff --git a/src/cpfront/linux/486/Posix/Mod/Cwctype.cp b/src/cpfront/linux/486/Posix/Mod/Cwctype.cp
--- /dev/null
@@ -0,0 +1,58 @@
+MODULE PosixCwctype ['wctype.h'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixClocale;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ wint_t* = INTEGER;
+ wctype_t* = INTEGER;
+
+ TYPE
+ wctrans_t* = INTEGER;
+
+ TYPE
+ locale_t* = PosixClocale.locale_t;
+
+ CONST
+ WEOF* = -1;
+
+ PROCEDURE [ccall] iswalpha* (wc: wint_t): int;
+ PROCEDURE [ccall] iswdigit* (wc: wint_t): int;
+ PROCEDURE [ccall] iswlower* (wc: wint_t): int;
+ PROCEDURE [ccall] iswupper* (wc: wint_t): int;
+ PROCEDURE [ccall] towlower* (wc: wint_t): wint_t;
+ PROCEDURE [ccall] towupper* (wc: wint_t): wint_t;
+
+END PosixCwctype.
diff --git a/src/cpfront/linux/generic/Posix/Mod/Cmacro.cp b/src/cpfront/linux/generic/Posix/Mod/Cmacro.cp
--- /dev/null
@@ -0,0 +1,15 @@
+MODULE PosixCmacro;
+
+ IMPORT SYSTEM, PosixCerrno, PosixCsys_stat;
+
+ PROCEDURE errno* (): PosixCerrno.int;
+ BEGIN
+ RETURN PosixCerrno.__errno_location()[0]
+ END errno;
+
+ PROCEDURE stat* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR buf: PosixCsys_stat.struct_stat): PosixCsys_stat.int;
+ BEGIN
+ RETURN PosixCsys_stat.stat(path, buf)
+ END stat;
+
+END PosixCmacro.
diff --git a/src/cpfront/posix/generic/System/Mod/Kernel.cp b/src/cpfront/posix/generic/System/Mod/Kernel.cp
index a3f6d712bf86c35e95adf33de2d7de72e3e7957a..82cac15b66e2ef650ba300c6444e9f28ce25bf19 100644 (file)
MODULE Kernel;
- IMPORT S := SYSTEM, stdlib := C99stdlib, stdio := C99stdio,
- time := C99time, wctype := C99wctype, sysmman := C99sys_mman,
- dlfcn := C99dlfcn, fcntl := C99fcntl, types := C99types,
- unistd := C99unistd, signal := C99signal, setjmp := C99setjmp;
+ IMPORT S := SYSTEM, stdlib := PosixCstdlib, stdio := PosixCstdio,
+ time := PosixCtime, wctype := PosixCwctype, sysmman := PosixCsys_mman,
+ dlfcn := PosixCdlfcn, fcntl := PosixCfcntl, types := PosixCtypes,
+ unistd := PosixCunistd, signal := PosixCsignal, setjmp := PosixCsetjmp;
(* init fpu? *)
(* add signal blocking to avoid race conditions in Try/Trap/TrapHandler *)
index 165e9c67eafdd1bf07c9fcf9de022ba36be76ddb..a1ad79839a1f22bf38f887862494da0697b87b38 100644 (file)
Binary files a/src/generic/Dev2/Mod/LnkChmod.odc and b/src/generic/Dev2/Mod/LnkChmod.odc differ
Binary files a/src/generic/Dev2/Mod/LnkChmod.odc and b/src/generic/Dev2/Mod/LnkChmod.odc differ
diff --git a/src/native/linux/486/C99/Mod/dirent.cp b/src/native/linux/486/C99/Mod/dirent.cp
+++ /dev/null
@@ -1,66 +0,0 @@
-MODULE C99dirent ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99sys_types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- PDIR* = POINTER TO DIR;
- DIR = LIMITED RECORD [untagged] END;
-
- TYPE
- Pstruct_dirent* = POINTER TO struct_dirent;
- struct_dirent* = RECORD [noalign] (* 268 *)
- d_ino*: ino_t; (* 0+4 *)
- _____align0_____: ARRAY 7 OF BYTE;
- d_name*: ARRAY [untagged] 256 OF SHORTCHAR; (* 11+256 *)
- _____align1_____: ARRAY 1 OF BYTE;
- END;
-
- TYPE
- ino_t* = C99sys_types.ino_t;
-
- PROCEDURE [ccall] alphasort* (IN a, b: Pstruct_dirent): int;
- PROCEDURE [ccall] closedir* (dirp: PDIR): int;
- PROCEDURE [ccall] dirfd* (dirp: PDIR): int;
- PROCEDURE [ccall] fdopendir* (fd: int): PDIR;
- PROCEDURE [ccall] opendir* (IN name: ARRAY [untagged] OF SHORTCHAR): PDIR;
- PROCEDURE [ccall] readdir* (dirp: PDIR): Pstruct_dirent;
- PROCEDURE [ccall] readdir_r* (dirp: PDIR; entry: Pstruct_dirent; VAR result: Pstruct_dirent): int;
- PROCEDURE [ccall] rewinddir* (dirp: PDIR);
- PROCEDURE [ccall] scandir* (IN dirp: ARRAY [untagged] OF SHORTCHAR; filter: PROCEDURE [ccall] (IN d: struct_dirent): int; compar: PROCEDURE [ccall] (IN a, b: Pstruct_dirent): int): int;
- PROCEDURE [ccall] seekdir* (dirp: PDIR; loc: long);
- PROCEDURE [ccall] telldir* (dirp: PDIR): long;
-
-END C99dirent.
diff --git a/src/native/linux/486/C99/Mod/dlfcn.cp b/src/native/linux/486/C99/Mod/dlfcn.cp
+++ /dev/null
@@ -1,49 +0,0 @@
-MODULE C99dlfcn ['libdl.so.2'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- CONST
- RTLD_LAZY* = 1;
- RTLD_NOW* = 2;
- RTLD_GLOBAL* = 256;
- RTLD_LOCAL* = 0;
-
- PROCEDURE [ccall] dlclose* (handle: C99types.Pvoid): int;
- PROCEDURE [ccall] dlerror* (): POINTER TO ARRAY [untagged] OF SHORTCHAR;
- PROCEDURE [ccall] dlopen* (IN [nil] filename: ARRAY [untagged] OF SHORTCHAR; flags: int): C99types.Pvoid;
- PROCEDURE [ccall] dlsym* (handle: C99types.Pvoid; IN symbol: ARRAY [untagged] OF SHORTCHAR): C99types.Pvoid;
-
-END C99dlfcn.
diff --git a/src/native/linux/486/C99/Mod/iconv.cp b/src/native/linux/486/C99/Mod/iconv.cp
+++ /dev/null
@@ -1,48 +0,0 @@
-MODULE C99iconv ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99sys_types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- iconv_t* = INTEGER;
-
- TYPE
- size_t* = C99sys_types.size_t;
-
- PROCEDURE [ccall] iconv* (cd: iconv_t; VAR [nil] inbuf: C99types.Pvoid; VAR inbytesleft: size_t; VAR [nil] outbuf: C99types.Pvoid; VAR outbytesleft: size_t): size_t;
- PROCEDURE [ccall] iconv_open* (IN tocode, fromcode: ARRAY [untagged] OF SHORTCHAR): iconv_t;
- PROCEDURE [ccall] iconv_close* (cd: iconv_t): int;
-
-END C99iconv.
diff --git a/src/native/linux/486/C99/Mod/libgen.cp b/src/native/linux/486/C99/Mod/libgen.cp
+++ /dev/null
@@ -1,41 +0,0 @@
-MODULE C99libgen ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- PROCEDURE [ccall] basename* (path: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
- PROCEDURE [ccall] dirname* (path: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
-
-END C99libgen.
diff --git a/src/native/linux/486/C99/Mod/locale.cp b/src/native/linux/486/C99/Mod/locale.cp
+++ /dev/null
@@ -1,75 +0,0 @@
-MODULE C99locale ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- Pstruct_lconv* = POINTER TO struct_lconv;
- struct_lconv = LIMITED RECORD [untagged] END;
-
- CONST
- LC_ALL* = 6;
- LC_COLLATE* = 3;
- LC_CTYPE* = 0;
- LC_MESSAGES* = 5;
- LC_MONETARY* = 4;
- LC_NUMERIC* = 1;
- LC_TIME* = 2;
-
- CONST
- LC_COLLATE_MASK* = 8;
- LC_CTYPE_MASK* = 1;
- LC_MESSAGES_MASK* = 32;
- LC_MONETARY_MASK* = 16;
- LC_NUMERIC_MASK* = 2;
- LC_TIME_MASK* = 4;
-
- CONST
- LC_ALL_MASK* = 8127;
-
- CONST
- LC_GLOBAL_LOCALE* = -1;
-
- TYPE
- locale_t* = INTEGER;
-
- PROCEDURE [ccall] duplocale* (locobj: locale_t): locale_t;
- PROCEDURE [ccall] freelocale* (locobj: locale_t);
- PROCEDURE [ccall] localeconv* (): Pstruct_lconv;
- PROCEDURE [ccall] newlocale* (category_mask: int; IN locale: ARRAY [untagged] OF SHORTCHAR; base: locale_t): locale_t;
- PROCEDURE [ccall] setlocale* (category: int; IN [nil] locale: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
- PROCEDURE [ccall] uselocale* (newloc: locale_t): locale_t;
-
-END C99locale.
diff --git a/src/native/linux/486/C99/Mod/macro.cp b/src/native/linux/486/C99/Mod/macro.cp
+++ /dev/null
@@ -1,15 +0,0 @@
-MODULE C99macro;
-
- IMPORT SYSTEM, C99errno, C99sys_stat;
-
- PROCEDURE errno* (): C99errno.int;
- BEGIN
- RETURN C99errno.__errno_location()[0]
- END errno;
-
- PROCEDURE stat* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR buf: C99sys_stat.struct_stat): C99sys_stat.int;
- BEGIN
- RETURN C99sys_stat.__xstat(C99sys_stat._STAT_VER, path, buf)
- END stat;
-
-END C99macro.
diff --git a/src/native/linux/486/C99/Mod/setjmp.cp b/src/native/linux/486/C99/Mod/setjmp.cp
+++ /dev/null
@@ -1,49 +0,0 @@
-MODULE C99setjmp ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- jmp_buf* = ARRAY [untagged] 156 OF BYTE;
- sigjmp_buf* = ARRAY [untagged] 156 OF BYTE;
-
- PROCEDURE [ccall] _longjmp* (IN env: jmp_buf; val: int);
- PROCEDURE [ccall] longjmp* (IN env: jmp_buf; val: int);
- PROCEDURE [ccall] siglongjmp* (IN env: sigjmp_buf; val: int);
- PROCEDURE [ccall] _setjmp* (VAR env: jmp_buf): int;
- PROCEDURE [ccall] setjmp* (VAR env: jmp_buf): int;
- PROCEDURE [ccall] sigsetjmp* ['__sigsetjmp'] (VAR env: sigjmp_buf; savesigs: int): int;
-
-END C99setjmp.
diff --git a/src/native/linux/486/C99/Mod/stdio.cp b/src/native/linux/486/C99/Mod/stdio.cp
+++ /dev/null
@@ -1,91 +0,0 @@
-MODULE C99stdio ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99sys_types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- PFILE* = POINTER TO FILE;
- FILE = LIMITED RECORD [untagged] END;
-
- TYPE
- fpos_t* = RECORD [noalign] _: ARRAY [untagged] 12 OF BYTE END;
-
- TYPE
- off_t* = C99sys_types.off_t;
- ssize_t* = C99sys_types.ssize_t;
-
- TYPE
- size_t* = INTEGER;
-
- TYPE
- va_list* = INTEGER;
-
- CONST
- BUFSIZ* = 8192;
- L_ctermid* = 9;
- L_tmpnam* = 20;
-
- CONST
- _IOFBF* = 0;
- _IOLBF* = 1;
- _IONBF* = 2;
-
- CONST
- SEEK_CUR* = 1;
- SEEK_END* = 2;
- SEEK_SET* = 0;
-
- CONST
- FILENAME_MAX* = 4096;
- FOPEN_MAX* = 16;
- TMP_MAX* = 238328;
-
- CONST
- EOF* = -1;
-
- PROCEDURE [ccall] fclose* (stream: PFILE): int;
- PROCEDURE [ccall] ferror* (stream: PFILE): int;
- PROCEDURE [ccall] fflush* (stream: PFILE): int;
- PROCEDURE [ccall] fopen* (IN pathname, mode: ARRAY [untagged] OF SHORTCHAR): PFILE;
- PROCEDURE [ccall] fread* (ptr: C99types.Pvoid; size, n: size_t; stream: PFILE): size_t;
- PROCEDURE [ccall] fseek* (stream: PFILE; offset: long; whence: int): int;
- PROCEDURE [ccall] ftell* (stream: PFILE): long;
- PROCEDURE [ccall] fwrite* (ptr: C99types.Pvoid; size, n: size_t; stream: PFILE): size_t;
- PROCEDURE [ccall] feof* (stream: PFILE): int;
- PROCEDURE [ccall] remove* (IN pathname: ARRAY [untagged] OF SHORTCHAR): int;
- PROCEDURE [ccall] rename* (IN old, new: ARRAY [untagged] OF SHORTCHAR): int;
- PROCEDURE [ccall] tmpfile* (): PFILE;
-
-END C99stdio.
diff --git a/src/native/linux/486/C99/Mod/stdlib.cp b/src/native/linux/486/C99/Mod/stdlib.cp
+++ /dev/null
@@ -1,66 +0,0 @@
-MODULE C99stdlib ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- CONST
- EXIT_FAILURE* = 1;
- EXIT_SUCCESS* = 0;
- RAND_MAX* = 2147483647;
-
- CONST
- MB_CUR_MAX* = 1;
-
- TYPE
- div_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
- ldiv_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
- lldiv_t* = RECORD [noalign] _: ARRAY [untagged] 16 OF BYTE END;
-
- TYPE
- size_t* = INTEGER;
- wchar_t* = INTEGER;
-
- PROCEDURE [ccall] _Exit* (status: int);
- PROCEDURE [ccall] abort* ;
- PROCEDURE [ccall] atexit* (function: PROCEDURE [ccall]): int;
- PROCEDURE [ccall] exit* (status: int);
- PROCEDURE [ccall] free* (ptr: C99types.Pvoid);
- PROCEDURE [ccall] getenv* (IN name: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
- PROCEDURE [ccall] malloc* (size: size_t): C99types.Pvoid;
- PROCEDURE [ccall] system* (IN command: ARRAY [untagged] OF SHORTCHAR): int;
- PROCEDURE [ccall] mkstemp* (VAR template: ARRAY [untagged] OF SHORTCHAR): int;
- PROCEDURE [ccall] realpath* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR [nil] resolved_path: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
-
-END C99stdlib.
diff --git a/src/native/linux/486/C99/Mod/sys_mman.cp b/src/native/linux/486/C99/Mod/sys_mman.cp
+++ /dev/null
@@ -1,86 +0,0 @@
-MODULE C99sys_mman ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99sys_types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- CONST
- PROT_EXEC* = 4;
- PROT_NONE* = 0;
- PROT_READ* = 1;
- PROT_WRITE* = 2;
-
- CONST
- MAP_FIXED* = 16;
- MAP_PRIVATE* = 2;
- MAP_SHARED* = 1;
-
- CONST
- MS_ASYNC* = 1;
- MS_INVALIDATE* = 2;
- MS_SYNC* = 4;
-
- CONST
- MCL_CURRENT* = 1;
- MCL_FUTURE* = 2;
-
- CONST
- MAP_FAILED* = -1;
-
- CONST
- POSIX_MADV_DONTNEED* = 4;
- POSIX_MADV_NORMAL* = 0;
- POSIX_MADV_RANDOM* = 1;
- POSIX_MADV_SEQUENTIAL* = 2;
- POSIX_MADV_WILLNEED* = 3;
-
- TYPE
- mode_t* = C99sys_types.mode_t;
- off_t* = C99sys_types.off_t;
- size_t* = C99sys_types.size_t;
-
- PROCEDURE [ccall] mlock* (addr: C99types.Pvoid; len: size_t): int;
- PROCEDURE [ccall] mlockall* (flags: int): int;
- PROCEDURE [ccall] mmap* (addr: C99types.Pvoid; len: size_t; prot, flags, fildes: int; off: off_t): C99types.Pvoid;
- PROCEDURE [ccall] mprotect* (addr: C99types.Pvoid; len: size_t; prot: int): int;
- PROCEDURE [ccall] msync* (addr: C99types.Pvoid; len: size_t; flags: int): int;
- PROCEDURE [ccall] munlock* (addr: C99types.Pvoid; len: size_t): int;
- PROCEDURE [ccall] munlockall* (): int;
- PROCEDURE [ccall] munmap* (addr: C99types.Pvoid; len: size_t): int;
- PROCEDURE [ccall] posix_madvise* (addr: C99types.Pvoid; len: size_t; advice: int): int;
- PROCEDURE [ccall] posix_mem_offset* (addr: C99types.Pvoid; len: size_t; VAR off: off_t; VAR contng_len: size_t; VAR fildes: int): int;
- PROCEDURE [ccall] shm_open* (IN name: ARRAY [untagged] OF SHORTCHAR; oflag, mode: int): int;
- PROCEDURE [ccall] shm_unlink* (IN name: ARRAY [untagged] OF SHORTCHAR): int;
-
-END C99sys_mman.
diff --git a/src/native/linux/486/C99/Mod/sys_types.cp b/src/native/linux/486/C99/Mod/sys_types.cp
+++ /dev/null
@@ -1,75 +0,0 @@
-MODULE C99sys_types ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- blkcnt_t* = INTEGER;
- blksize_t* = INTEGER;
- clock_t* = INTEGER;
- clockid_t* = INTEGER;
- dev_t* = LONGINT;
- fsblkcnt_t* = INTEGER;
- fsfilcnt_t* = INTEGER;
- gid_t* = INTEGER;
- id_t* = INTEGER;
- ino_t* = INTEGER;
- key_t* = INTEGER;
- mode_t* = INTEGER;
- nlink_t* = INTEGER;
- off_t* = INTEGER;
- pid_t* = INTEGER;
- pthread_attr_t* = RECORD [noalign] _: ARRAY [untagged] 36 OF BYTE END;
- pthread_barrier_t* = RECORD [noalign] _: ARRAY [untagged] 20 OF BYTE END;
- pthread_barrierattr_t* = INTEGER;
- pthread_cond_t* = RECORD [noalign] _: ARRAY [untagged] 48 OF BYTE END;
- pthread_condattr_t* = INTEGER;
- pthread_key_t* = INTEGER;
- pthread_mutex_t* = RECORD [noalign] _: ARRAY [untagged] 24 OF BYTE END;
- pthread_mutexattr_t* = INTEGER;
- pthread_once_t* = INTEGER;
- pthread_rwlock_t* = RECORD [noalign] _: ARRAY [untagged] 32 OF BYTE END;
- pthread_rwlockattr_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
- pthread_spinlock_t* = INTEGER;
- pthread_t* = INTEGER;
- size_t* = INTEGER;
- ssize_t* = INTEGER;
- suseconds_t* = INTEGER;
- time_t* = INTEGER;
- timer_t* = INTEGER;
- uid_t* = INTEGER;
-
-
-END C99sys_types.
diff --git a/src/native/linux/486/C99/Mod/wctype.cp b/src/native/linux/486/C99/Mod/wctype.cp
+++ /dev/null
@@ -1,58 +0,0 @@
-MODULE C99wctype ['libc.so.6'];
-
- (* generated by genposix.sh, do not modify *)
-
- IMPORT SYSTEM, C99types, C99locale;
-
- TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
-
- TYPE
- wint_t* = INTEGER;
- wctype_t* = INTEGER;
-
- TYPE
- wctrans_t* = INTEGER;
-
- TYPE
- locale_t* = C99locale.locale_t;
-
- CONST
- WEOF* = -1;
-
- PROCEDURE [ccall] iswalpha* (wc: wint_t): int;
- PROCEDURE [ccall] iswdigit* (wc: wint_t): int;
- PROCEDURE [ccall] iswlower* (wc: wint_t): int;
- PROCEDURE [ccall] iswupper* (wc: wint_t): int;
- PROCEDURE [ccall] towlower* (wc: wint_t): wint_t;
- PROCEDURE [ccall] towupper* (wc: wint_t): wint_t;
-
-END C99wctype.
diff --git a/src/native/linux/486/Posix/Mod/Cdirent.cp b/src/native/linux/486/Posix/Mod/Cdirent.cp
--- /dev/null
@@ -0,0 +1,66 @@
+MODULE PosixCdirent ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ PDIR* = POINTER TO DIR;
+ DIR = LIMITED RECORD [untagged] END;
+
+ TYPE
+ Pstruct_dirent* = POINTER TO struct_dirent;
+ struct_dirent* = RECORD [noalign] (* 268 *)
+ d_ino*: ino_t; (* 0+4 *)
+ _____align0_____: ARRAY 7 OF BYTE;
+ d_name*: ARRAY [untagged] 256 OF SHORTCHAR; (* 11+256 *)
+ _____align1_____: ARRAY 1 OF BYTE;
+ END;
+
+ TYPE
+ ino_t* = PosixCsys_types.ino_t;
+
+ PROCEDURE [ccall] alphasort* (IN a, b: Pstruct_dirent): int;
+ PROCEDURE [ccall] closedir* (dirp: PDIR): int;
+ PROCEDURE [ccall] dirfd* (dirp: PDIR): int;
+ PROCEDURE [ccall] fdopendir* (fd: int): PDIR;
+ PROCEDURE [ccall] opendir* (IN name: ARRAY [untagged] OF SHORTCHAR): PDIR;
+ PROCEDURE [ccall] readdir* (dirp: PDIR): Pstruct_dirent;
+ PROCEDURE [ccall] readdir_r* (dirp: PDIR; entry: Pstruct_dirent; VAR result: Pstruct_dirent): int;
+ PROCEDURE [ccall] rewinddir* (dirp: PDIR);
+ PROCEDURE [ccall] scandir* (IN dirp: ARRAY [untagged] OF SHORTCHAR; filter: PROCEDURE [ccall] (IN d: struct_dirent): int; compar: PROCEDURE [ccall] (IN a, b: Pstruct_dirent): int): int;
+ PROCEDURE [ccall] seekdir* (dirp: PDIR; loc: long);
+ PROCEDURE [ccall] telldir* (dirp: PDIR): long;
+
+END PosixCdirent.
diff --git a/src/native/linux/486/Posix/Mod/Cdlfcn.cp b/src/native/linux/486/Posix/Mod/Cdlfcn.cp
--- /dev/null
@@ -0,0 +1,49 @@
+MODULE PosixCdlfcn ['libdl.so.2'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ CONST
+ RTLD_LAZY* = 1;
+ RTLD_NOW* = 2;
+ RTLD_GLOBAL* = 256;
+ RTLD_LOCAL* = 0;
+
+ PROCEDURE [ccall] dlclose* (handle: PosixCtypes.Pvoid): int;
+ PROCEDURE [ccall] dlerror* (): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+ PROCEDURE [ccall] dlopen* (IN [nil] filename: ARRAY [untagged] OF SHORTCHAR; flags: int): PosixCtypes.Pvoid;
+ PROCEDURE [ccall] dlsym* (handle: PosixCtypes.Pvoid; IN symbol: ARRAY [untagged] OF SHORTCHAR): PosixCtypes.Pvoid;
+
+END PosixCdlfcn.
similarity index 55%
rename from src/cpfront/linux/486/C99/Mod/errno.cp
rename to src/native/linux/486/Posix/Mod/Cerrno.cp
index f0f27cff1eb227ff2da2a157791cbf0cbebd8a7b..7127eaf3413b1a3ae12a397d497039f4827c0cd0 100644 (file)
rename from src/cpfront/linux/486/C99/Mod/errno.cp
rename to src/native/linux/486/Posix/Mod/Cerrno.cp
index f0f27cff1eb227ff2da2a157791cbf0cbebd8a7b..7127eaf3413b1a3ae12a397d497039f4827c0cd0 100644 (file)
-MODULE C99errno ['errno.h'];
+MODULE PosixCerrno ['libc.so.6'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types;
+ IMPORT SYSTEM, PosixCtypes;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
E2BIG* = 7;
PROCEDURE [ccall] __errno_location* (): POINTER TO ARRAY [untagged] 1 OF int;
-END C99errno.
+END PosixCerrno.
similarity index 56%
rename from src/native/linux/486/C99/Mod/fcntl.cp
rename to src/native/linux/486/Posix/Mod/Cfcntl.cp
index 14029775534ee2259f6760c77051e5a399b15ad1..cbea74d7c9ecd7607496b11b9bad93a3b62cf57c 100644 (file)
rename from src/native/linux/486/C99/Mod/fcntl.cp
rename to src/native/linux/486/Posix/Mod/Cfcntl.cp
index 14029775534ee2259f6760c77051e5a399b15ad1..cbea74d7c9ecd7607496b11b9bad93a3b62cf57c 100644 (file)
-MODULE C99fcntl ['libc.so.6'];
+MODULE PosixCfcntl ['libc.so.6'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99sys_types;
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
F_DUPFD* = 0;
END;
TYPE
- mode_t* = C99sys_types.mode_t;
- off_t* = C99sys_types.off_t;
- pid_t* = C99sys_types.pid_t;
+ mode_t* = PosixCsys_types.mode_t;
+ off_t* = PosixCsys_types.off_t;
+ pid_t* = PosixCsys_types.pid_t;
PROCEDURE [ccall] creat* (IN pathname: ARRAY [untagged] OF SHORTCHAR; mode: mode_t): int;
PROCEDURE [ccall] fcntl* (fildes, cmd, arg: int): int;
PROCEDURE [ccall] posix_fadvise* (fd: int; offset, len: off_t; advice: int): int;
PROCEDURE [ccall] posix_fallocate* (fd: int; offset, len: off_t): int;
-END C99fcntl.
+END PosixCfcntl.
diff --git a/src/native/linux/486/Posix/Mod/Ciconv.cp b/src/native/linux/486/Posix/Mod/Ciconv.cp
--- /dev/null
@@ -0,0 +1,48 @@
+MODULE PosixCiconv ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ iconv_t* = INTEGER;
+
+ TYPE
+ size_t* = PosixCsys_types.size_t;
+
+ PROCEDURE [ccall] iconv* (cd: iconv_t; VAR [nil] inbuf: PosixCtypes.Pvoid; VAR inbytesleft: size_t; VAR [nil] outbuf: PosixCtypes.Pvoid; VAR outbytesleft: size_t): size_t;
+ PROCEDURE [ccall] iconv_open* (IN tocode, fromcode: ARRAY [untagged] OF SHORTCHAR): iconv_t;
+ PROCEDURE [ccall] iconv_close* (cd: iconv_t): int;
+
+END PosixCiconv.
diff --git a/src/native/linux/486/Posix/Mod/Clibgen.cp b/src/native/linux/486/Posix/Mod/Clibgen.cp
--- /dev/null
@@ -0,0 +1,41 @@
+MODULE PosixClibgen ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ PROCEDURE [ccall] basename* (path: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+ PROCEDURE [ccall] dirname* (path: POINTER TO ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+
+END PosixClibgen.
diff --git a/src/native/linux/486/Posix/Mod/Clocale.cp b/src/native/linux/486/Posix/Mod/Clocale.cp
--- /dev/null
@@ -0,0 +1,75 @@
+MODULE PosixClocale ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ Pstruct_lconv* = POINTER TO struct_lconv;
+ struct_lconv = LIMITED RECORD [untagged] END;
+
+ CONST
+ LC_ALL* = 6;
+ LC_COLLATE* = 3;
+ LC_CTYPE* = 0;
+ LC_MESSAGES* = 5;
+ LC_MONETARY* = 4;
+ LC_NUMERIC* = 1;
+ LC_TIME* = 2;
+
+ CONST
+ LC_COLLATE_MASK* = 8;
+ LC_CTYPE_MASK* = 1;
+ LC_MESSAGES_MASK* = 32;
+ LC_MONETARY_MASK* = 16;
+ LC_NUMERIC_MASK* = 2;
+ LC_TIME_MASK* = 4;
+
+ CONST
+ LC_ALL_MASK* = 8127;
+
+ CONST
+ LC_GLOBAL_LOCALE* = -1;
+
+ TYPE
+ locale_t* = INTEGER;
+
+ PROCEDURE [ccall] duplocale* (locobj: locale_t): locale_t;
+ PROCEDURE [ccall] freelocale* (locobj: locale_t);
+ PROCEDURE [ccall] localeconv* (): Pstruct_lconv;
+ PROCEDURE [ccall] newlocale* (category_mask: int; IN locale: ARRAY [untagged] OF SHORTCHAR; base: locale_t): locale_t;
+ PROCEDURE [ccall] setlocale* (category: int; IN [nil] locale: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+ PROCEDURE [ccall] uselocale* (newloc: locale_t): locale_t;
+
+END PosixClocale.
diff --git a/src/native/linux/486/Posix/Mod/Csetjmp.cp b/src/native/linux/486/Posix/Mod/Csetjmp.cp
--- /dev/null
@@ -0,0 +1,49 @@
+MODULE PosixCsetjmp ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ jmp_buf* = ARRAY [untagged] 156 OF BYTE;
+ sigjmp_buf* = ARRAY [untagged] 156 OF BYTE;
+
+ PROCEDURE [ccall] _longjmp* (IN env: jmp_buf; val: int);
+ PROCEDURE [ccall] longjmp* (IN env: jmp_buf; val: int);
+ PROCEDURE [ccall] siglongjmp* (IN env: sigjmp_buf; val: int);
+ PROCEDURE [ccall] _setjmp* (VAR env: jmp_buf): int;
+ PROCEDURE [ccall] setjmp* (VAR env: jmp_buf): int;
+ PROCEDURE [ccall] sigsetjmp* ['__sigsetjmp'] (VAR env: sigjmp_buf; savesigs: int): int;
+
+END PosixCsetjmp.
similarity index 79%
rename from src/native/linux/486/C99/Mod/signal.cp
rename to src/native/linux/486/Posix/Mod/Csignal.cp
index 343afcb78c330d19be0bf2d3142e232e376b098b..b063d925dcb86033d663fa333d8b4894b080c723 100644 (file)
rename from src/native/linux/486/C99/Mod/signal.cp
rename to src/native/linux/486/Posix/Mod/Csignal.cp
index 343afcb78c330d19be0bf2d3142e232e376b098b..b063d925dcb86033d663fa333d8b4894b080c723 100644 (file)
-MODULE C99signal ['libc.so.6'];
+MODULE PosixCsignal ['libc.so.6'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99sys_types, C99time;
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types, PosixCtime;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
SIG_DFL* = 0;
SIG_IGN* = 1;
TYPE
- pthread_t* = C99sys_types.pthread_t;
- pthread_attr_t* = C99sys_types.pthread_attr_t;
- size_t* = C99sys_types.size_t;
- uid_t* = C99sys_types.uid_t;
- pid_t* = C99sys_types.pid_t;
+ pthread_t* = PosixCsys_types.pthread_t;
+ pthread_attr_t* = PosixCsys_types.pthread_attr_t;
+ size_t* = PosixCsys_types.size_t;
+ uid_t* = PosixCsys_types.uid_t;
+ pid_t* = PosixCsys_types.pid_t;
TYPE
- struct_timespec* = C99time.struct_timespec;
+ struct_timespec* = PosixCtime.struct_timespec;
TYPE
sig_atomic_t* = INTEGER;
Punion_sigval* = POINTER TO union_sigval;
union_sigval* = RECORD [union] (* 4 *)
sival_int*: int; (* 0+4 *)
- sival_ptr*: C99types.Pvoid; (* 0+4 *)
+ sival_ptr*: PosixCtypes.Pvoid; (* 0+4 *)
END;
CONST
struct_sigaction* = RECORD [noalign] (* 140 *)
handler*: RECORD [union] (* 4 *)
sa_handler*: PROCEDURE [ccall] (sig: int); (* 0+4 *)
- sa_sigaction*: PROCEDURE [ccall] (sig: int; IN siginfo: siginfo_t; context: C99types.Pvoid); (* 0+4 *)
+ sa_sigaction*: PROCEDURE [ccall] (sig: int; IN siginfo: siginfo_t; context: PosixCtypes.Pvoid); (* 0+4 *)
END; (* 0+4 *)
sa_mask*: sigset_t; (* 4+128 *)
sa_flags*: int; (* 132+4 *)
TYPE
Pstack_t* = POINTER TO stack_t;
stack_t* = RECORD [noalign] (* 12 *)
- ss_sp*: C99types.Pvoid; (* 0+4 *)
+ ss_sp*: PosixCtypes.Pvoid; (* 0+4 *)
ss_flags*: int; (* 4+4 *)
ss_size*: size_t; (* 8+4 *)
END;
si_code*: int; (* 8+4 *)
info*: RECORD [union] (* 12 *)
sigill*: RECORD [noalign] (* 4 *)
- si_addr*: C99types.Pvoid; (* 0+4 *)
+ si_addr*: PosixCtypes.Pvoid; (* 0+4 *)
END; (* 0+4 *)
sigfpe*: RECORD [noalign] (* 4 *)
- si_addr*: C99types.Pvoid; (* 0+4 *)
+ si_addr*: PosixCtypes.Pvoid; (* 0+4 *)
END; (* 0+4 *)
sigsegv*: RECORD [noalign] (* 4 *)
- si_addr*: C99types.Pvoid; (* 0+4 *)
+ si_addr*: PosixCtypes.Pvoid; (* 0+4 *)
END; (* 0+4 *)
sigbus*: RECORD [noalign] (* 4 *)
- si_addr*: C99types.Pvoid; (* 0+4 *)
+ si_addr*: PosixCtypes.Pvoid; (* 0+4 *)
END; (* 0+4 *)
sigchld*: RECORD [noalign] (* 12 *)
si_pid*: pid_t; (* 0+4 *)
PROCEDURE [ccall] sigwait* (IN set: sigset_t; VAR sig: int): int;
PROCEDURE [ccall] sigwaitinfo* (IN set: sigset_t; VAR [nil] info: siginfo_t): int;
-END C99signal.
+END PosixCsignal.
diff --git a/src/native/linux/486/Posix/Mod/Cstdio.cp b/src/native/linux/486/Posix/Mod/Cstdio.cp
--- /dev/null
@@ -0,0 +1,91 @@
+MODULE PosixCstdio ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ PFILE* = POINTER TO FILE;
+ FILE = LIMITED RECORD [untagged] END;
+
+ TYPE
+ fpos_t* = RECORD [noalign] _: ARRAY [untagged] 12 OF BYTE END;
+
+ TYPE
+ off_t* = PosixCsys_types.off_t;
+ ssize_t* = PosixCsys_types.ssize_t;
+
+ TYPE
+ size_t* = INTEGER;
+
+ TYPE
+ va_list* = INTEGER;
+
+ CONST
+ BUFSIZ* = 8192;
+ L_ctermid* = 9;
+ L_tmpnam* = 20;
+
+ CONST
+ _IOFBF* = 0;
+ _IOLBF* = 1;
+ _IONBF* = 2;
+
+ CONST
+ SEEK_CUR* = 1;
+ SEEK_END* = 2;
+ SEEK_SET* = 0;
+
+ CONST
+ FILENAME_MAX* = 4096;
+ FOPEN_MAX* = 16;
+ TMP_MAX* = 238328;
+
+ CONST
+ EOF* = -1;
+
+ PROCEDURE [ccall] fclose* (stream: PFILE): int;
+ PROCEDURE [ccall] ferror* (stream: PFILE): int;
+ PROCEDURE [ccall] fflush* (stream: PFILE): int;
+ PROCEDURE [ccall] fopen* (IN pathname, mode: ARRAY [untagged] OF SHORTCHAR): PFILE;
+ PROCEDURE [ccall] fread* (ptr: PosixCtypes.Pvoid; size, n: size_t; stream: PFILE): size_t;
+ PROCEDURE [ccall] fseek* (stream: PFILE; offset: long; whence: int): int;
+ PROCEDURE [ccall] ftell* (stream: PFILE): long;
+ PROCEDURE [ccall] fwrite* (ptr: PosixCtypes.Pvoid; size, n: size_t; stream: PFILE): size_t;
+ PROCEDURE [ccall] feof* (stream: PFILE): int;
+ PROCEDURE [ccall] remove* (IN pathname: ARRAY [untagged] OF SHORTCHAR): int;
+ PROCEDURE [ccall] rename* (IN old, new: ARRAY [untagged] OF SHORTCHAR): int;
+ PROCEDURE [ccall] tmpfile* (): PFILE;
+
+END PosixCstdio.
diff --git a/src/native/linux/486/Posix/Mod/Cstdlib.cp b/src/native/linux/486/Posix/Mod/Cstdlib.cp
--- /dev/null
@@ -0,0 +1,66 @@
+MODULE PosixCstdlib ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ CONST
+ EXIT_FAILURE* = 1;
+ EXIT_SUCCESS* = 0;
+ RAND_MAX* = 2147483647;
+
+ CONST
+ MB_CUR_MAX* = 1;
+
+ TYPE
+ div_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
+ ldiv_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
+ lldiv_t* = RECORD [noalign] _: ARRAY [untagged] 16 OF BYTE END;
+
+ TYPE
+ size_t* = INTEGER;
+ wchar_t* = INTEGER;
+
+ PROCEDURE [ccall] _Exit* (status: int);
+ PROCEDURE [ccall] abort* ;
+ PROCEDURE [ccall] atexit* (function: PROCEDURE [ccall]): int;
+ PROCEDURE [ccall] exit* (status: int);
+ PROCEDURE [ccall] free* (ptr: PosixCtypes.Pvoid);
+ PROCEDURE [ccall] getenv* (IN name: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+ PROCEDURE [ccall] malloc* (size: size_t): PosixCtypes.Pvoid;
+ PROCEDURE [ccall] system* (IN command: ARRAY [untagged] OF SHORTCHAR): int;
+ PROCEDURE [ccall] mkstemp* (VAR template: ARRAY [untagged] OF SHORTCHAR): int;
+ PROCEDURE [ccall] realpath* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR [nil] resolved_path: ARRAY [untagged] OF SHORTCHAR): POINTER TO ARRAY [untagged] OF SHORTCHAR;
+
+END PosixCstdlib.
diff --git a/src/native/linux/486/Posix/Mod/Csys_mman.cp b/src/native/linux/486/Posix/Mod/Csys_mman.cp
--- /dev/null
@@ -0,0 +1,86 @@
+MODULE PosixCsys_mman ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ CONST
+ PROT_EXEC* = 4;
+ PROT_NONE* = 0;
+ PROT_READ* = 1;
+ PROT_WRITE* = 2;
+
+ CONST
+ MAP_FIXED* = 16;
+ MAP_PRIVATE* = 2;
+ MAP_SHARED* = 1;
+
+ CONST
+ MS_ASYNC* = 1;
+ MS_INVALIDATE* = 2;
+ MS_SYNC* = 4;
+
+ CONST
+ MCL_CURRENT* = 1;
+ MCL_FUTURE* = 2;
+
+ CONST
+ MAP_FAILED* = -1;
+
+ CONST
+ POSIX_MADV_DONTNEED* = 4;
+ POSIX_MADV_NORMAL* = 0;
+ POSIX_MADV_RANDOM* = 1;
+ POSIX_MADV_SEQUENTIAL* = 2;
+ POSIX_MADV_WILLNEED* = 3;
+
+ TYPE
+ mode_t* = PosixCsys_types.mode_t;
+ off_t* = PosixCsys_types.off_t;
+ size_t* = PosixCsys_types.size_t;
+
+ PROCEDURE [ccall] mlock* (addr: PosixCtypes.Pvoid; len: size_t): int;
+ PROCEDURE [ccall] mlockall* (flags: int): int;
+ PROCEDURE [ccall] mmap* (addr: PosixCtypes.Pvoid; len: size_t; prot, flags, fildes: int; off: off_t): PosixCtypes.Pvoid;
+ PROCEDURE [ccall] mprotect* (addr: PosixCtypes.Pvoid; len: size_t; prot: int): int;
+ PROCEDURE [ccall] msync* (addr: PosixCtypes.Pvoid; len: size_t; flags: int): int;
+ PROCEDURE [ccall] munlock* (addr: PosixCtypes.Pvoid; len: size_t): int;
+ PROCEDURE [ccall] munlockall* (): int;
+ PROCEDURE [ccall] munmap* (addr: PosixCtypes.Pvoid; len: size_t): int;
+ PROCEDURE [ccall] posix_madvise* (addr: PosixCtypes.Pvoid; len: size_t; advice: int): int;
+ PROCEDURE [ccall] posix_mem_offset* (addr: PosixCtypes.Pvoid; len: size_t; VAR off: off_t; VAR contng_len: size_t; VAR fildes: int): int;
+ PROCEDURE [ccall] shm_open* (IN name: ARRAY [untagged] OF SHORTCHAR; oflag, mode: int): int;
+ PROCEDURE [ccall] shm_unlink* (IN name: ARRAY [untagged] OF SHORTCHAR): int;
+
+END PosixCsys_mman.
similarity index 61%
rename from src/native/linux/486/C99/Mod/sys_stat.cp
rename to src/native/linux/486/Posix/Mod/Csys_stat.cp
index a0b745b2f29cfdd94b8d53e177d932095570964d..1210ce78e9b007e1f7710842346f28eb6885cbda 100644 (file)
rename from src/native/linux/486/C99/Mod/sys_stat.cp
rename to src/native/linux/486/Posix/Mod/Csys_stat.cp
index a0b745b2f29cfdd94b8d53e177d932095570964d..1210ce78e9b007e1f7710842346f28eb6885cbda 100644 (file)
-MODULE C99sys_stat ['libc.so.6'];
+MODULE PosixCsys_stat ['libc.so.6'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99time, C99sys_types;
+ IMPORT SYSTEM, PosixCtypes, PosixCtime, PosixCsys_types;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
S_IFMT* = 61440;
UTIME_OMIT* = 1073741822;
TYPE
- blkcnt_t* = C99sys_types.blkcnt_t;
- blksize_t* = C99sys_types.blksize_t;
- dev_t* = C99sys_types.dev_t;
- ino_t* = C99sys_types.ino_t;
- mode_t* = C99sys_types.mode_t;
- nlink_t* = C99sys_types.nlink_t;
- uid_t* = C99sys_types.uid_t;
- gid_t* = C99sys_types.gid_t;
- off_t* = C99sys_types.off_t;
- time_t* = C99sys_types.time_t;
+ blkcnt_t* = PosixCsys_types.blkcnt_t;
+ blksize_t* = PosixCsys_types.blksize_t;
+ dev_t* = PosixCsys_types.dev_t;
+ ino_t* = PosixCsys_types.ino_t;
+ mode_t* = PosixCsys_types.mode_t;
+ nlink_t* = PosixCsys_types.nlink_t;
+ uid_t* = PosixCsys_types.uid_t;
+ gid_t* = PosixCsys_types.gid_t;
+ off_t* = PosixCsys_types.off_t;
+ time_t* = PosixCsys_types.time_t;
TYPE
- struct_timespec* = C99time.struct_timespec;
+ struct_timespec* = PosixCtime.struct_timespec;
TYPE
Pstruct_stat* = POINTER TO struct_stat;
PROCEDURE [ccall] umask* (mode: mode_t): mode_t;
PROCEDURE [ccall] utimensat* (dirfd: int; IN pathname: ARRAY [untagged] OF SHORTCHAR; IN times: ARRAY [untagged] 2 OF struct_timespec; flags: int): int;
-END C99sys_stat.
+END PosixCsys_stat.
diff --git a/src/native/linux/486/Posix/Mod/Csys_types.cp b/src/native/linux/486/Posix/Mod/Csys_types.cp
--- /dev/null
@@ -0,0 +1,75 @@
+MODULE PosixCsys_types ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ blkcnt_t* = INTEGER;
+ blksize_t* = INTEGER;
+ clock_t* = INTEGER;
+ clockid_t* = INTEGER;
+ dev_t* = LONGINT;
+ fsblkcnt_t* = INTEGER;
+ fsfilcnt_t* = INTEGER;
+ gid_t* = INTEGER;
+ id_t* = INTEGER;
+ ino_t* = INTEGER;
+ key_t* = INTEGER;
+ mode_t* = INTEGER;
+ nlink_t* = INTEGER;
+ off_t* = INTEGER;
+ pid_t* = INTEGER;
+ pthread_attr_t* = RECORD [noalign] _: ARRAY [untagged] 36 OF BYTE END;
+ pthread_barrier_t* = RECORD [noalign] _: ARRAY [untagged] 20 OF BYTE END;
+ pthread_barrierattr_t* = INTEGER;
+ pthread_cond_t* = RECORD [noalign] _: ARRAY [untagged] 48 OF BYTE END;
+ pthread_condattr_t* = INTEGER;
+ pthread_key_t* = INTEGER;
+ pthread_mutex_t* = RECORD [noalign] _: ARRAY [untagged] 24 OF BYTE END;
+ pthread_mutexattr_t* = INTEGER;
+ pthread_once_t* = INTEGER;
+ pthread_rwlock_t* = RECORD [noalign] _: ARRAY [untagged] 32 OF BYTE END;
+ pthread_rwlockattr_t* = RECORD [noalign] _: ARRAY [untagged] 8 OF BYTE END;
+ pthread_spinlock_t* = INTEGER;
+ pthread_t* = INTEGER;
+ size_t* = INTEGER;
+ ssize_t* = INTEGER;
+ suseconds_t* = INTEGER;
+ time_t* = INTEGER;
+ timer_t* = INTEGER;
+ uid_t* = INTEGER;
+
+
+END PosixCsys_types.
similarity index 68%
rename from src/native/linux/486/C99/Mod/time.cp
rename to src/native/linux/486/Posix/Mod/Ctime.cp
index 5ff122e34b334e0385479085428a62e451b8f3a8..3f3d5ec08f2b3da3e0c51b55f9b80916c638795d 100644 (file)
rename from src/native/linux/486/C99/Mod/time.cp
rename to src/native/linux/486/Posix/Mod/Ctime.cp
index 5ff122e34b334e0385479085428a62e451b8f3a8..3f3d5ec08f2b3da3e0c51b55f9b80916c638795d 100644 (file)
-MODULE C99time ['librt.so.1'];
+MODULE PosixCtime ['librt.so.1'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99sys_types, C99locale;
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types, PosixClocale;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
TYPE
- clock_t* = C99sys_types.clock_t;
- size_t* = C99sys_types.size_t;
- time_t* = C99sys_types.time_t;
- clockid_t* = C99sys_types.clockid_t;
- timer_t* = C99sys_types.timer_t;
- pid_t* = C99sys_types.pid_t;
+ clock_t* = PosixCsys_types.clock_t;
+ size_t* = PosixCsys_types.size_t;
+ time_t* = PosixCsys_types.time_t;
+ clockid_t* = PosixCsys_types.clockid_t;
+ timer_t* = PosixCsys_types.timer_t;
+ pid_t* = PosixCsys_types.pid_t;
TYPE
- locale_t* = C99locale.locale_t;
+ locale_t* = PosixClocale.locale_t;
TYPE
Pstruct_tm* = POINTER TO struct_tm;
PROCEDURE [ccall] timer_settime* (timerid: timer_t; flags: int; IN value: struct_itimerspec; VAR [nil] ovalue: struct_itimerspec): int;
PROCEDURE [ccall] tzset* ;
-END C99time.
+END PosixCtime.
similarity index 94%
rename from src/cpfront/linux/486/C99/Mod/types.cp
rename to src/native/linux/486/Posix/Mod/Ctypes.cp
index 3dbd832ef2582f159a2840cda1cfa97e548b2453..6cdc535f8569becd6b1f4b73e7ad8b90bca5fa1f 100644 (file)
rename from src/cpfront/linux/486/C99/Mod/types.cp
rename to src/native/linux/486/Posix/Mod/Ctypes.cp
index 3dbd832ef2582f159a2840cda1cfa97e548b2453..6cdc535f8569becd6b1f4b73e7ad8b90bca5fa1f 100644 (file)
-MODULE C99types;
+MODULE PosixCtypes;
(* generated by genposix.sh, do not modify *)
+IMPORT SYSTEM;
+
TYPE
char* = BYTE;
signed_char* = BYTE;
Pvoid* = INTEGER;
-END C99types.
+END PosixCtypes.
similarity index 87%
rename from src/native/linux/486/C99/Mod/unistd.cp
rename to src/native/linux/486/Posix/Mod/Cunistd.cp
index 47ee6c4913ab6651012b381d2f9c27f67a02f28f..40811e23556b6d7794557dc60307b8d92b16e21b 100644 (file)
rename from src/native/linux/486/C99/Mod/unistd.cp
rename to src/native/linux/486/Posix/Mod/Cunistd.cp
index 47ee6c4913ab6651012b381d2f9c27f67a02f28f..40811e23556b6d7794557dc60307b8d92b16e21b 100644 (file)
-MODULE C99unistd ['libc.so.6'];
+MODULE PosixCunistd ['libc.so.6'];
(* generated by genposix.sh, do not modify *)
- IMPORT SYSTEM, C99types, C99sys_types;
+ IMPORT SYSTEM, PosixCtypes, PosixCsys_types;
TYPE
- char* = C99types.char;
- signed_char* = C99types.signed_char;
- unsigned_char* = C99types.unsigned_char;
- short* = C99types.short;
- short_int* = C99types.short_int;
- signed_short* = C99types.signed_short;
- signed_short_int* = C99types.signed_short_int;
- unsigned_short* = C99types.unsigned_short;
- unsigned_short_int* = C99types.unsigned_short_int;
- int* = C99types.int;
- signed* = C99types.signed;
- signed_int* = C99types.signed_int;
- unsigned* = C99types.unsigned;
- unsigned_int* = C99types.unsigned_int;
- long* = C99types.long;
- long_int* = C99types.long_int;
- signed_long* = C99types.signed_long;
- signed_long_int* = C99types.signed_long_int;
- unsigned_long* = C99types.unsigned_long;
- unsigned_long_int* = C99types.unsigned_long_int;
- long_long* = C99types.long_long;
- long_long_int* = C99types.long_long_int;
- signed_long_long* = C99types.signed_long_long;
- signed_long_long_int* = C99types.signed_long_long_int;
- unsigned_long_long* = C99types.unsigned_long_long;
- unsigned_long_long_int* = C99types.unsigned_long_long_int;
- float* = C99types.float;
- double* = C99types.double;
- long_double* = C99types.long_double;
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
CONST
_POSIX_VERSION* = 200809;
_POSIX_VDISABLE* = 0;
TYPE
- size_t* = C99sys_types.size_t;
- ssize_t* = C99sys_types.ssize_t;
- uid_t* = C99sys_types.uid_t;
- gid_t* = C99sys_types.gid_t;
- off_t* = C99sys_types.off_t;
- pid_t* = C99sys_types.pid_t;
+ size_t* = PosixCsys_types.size_t;
+ ssize_t* = PosixCsys_types.ssize_t;
+ uid_t* = PosixCsys_types.uid_t;
+ gid_t* = PosixCsys_types.gid_t;
+ off_t* = PosixCsys_types.off_t;
+ pid_t* = PosixCsys_types.pid_t;
TYPE
intptr_t* = INTEGER;
PROCEDURE [ccall] pathconf* (IN path: ARRAY [untagged] OF SHORTCHAR; name: int): long;
PROCEDURE [ccall] pause* (): int;
PROCEDURE [ccall] pipe* (VAR fildes: ARRAY [untagged] 2 OF int): int;
- PROCEDURE [ccall] pread* (fildes: int; buf: C99types.Pvoid; nbyte: size_t; offset: off_t): ssize_t;
- PROCEDURE [ccall] pwrite* (fildes: int; buf: C99types.Pvoid; nbyte: size_t; offset: off_t): ssize_t;
- PROCEDURE [ccall] read* (fildes: int; buf: C99types.Pvoid; nbyte: size_t): ssize_t;
+ PROCEDURE [ccall] pread* (fildes: int; buf: PosixCtypes.Pvoid; nbyte: size_t; offset: off_t): ssize_t;
+ PROCEDURE [ccall] pwrite* (fildes: int; buf: PosixCtypes.Pvoid; nbyte: size_t; offset: off_t): ssize_t;
+ PROCEDURE [ccall] read* (fildes: int; buf: PosixCtypes.Pvoid; nbyte: size_t): ssize_t;
PROCEDURE [ccall] readlink* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR buf: ARRAY [untagged] OF SHORTCHAR; bufsize: size_t): ssize_t;
PROCEDURE [ccall] readlinkat* (fd: int; IN path: ARRAY [untagged] OF SHORTCHAR; VAR buf: ARRAY [untagged] OF SHORTCHAR; bufsize: size_t): ssize_t;
PROCEDURE [ccall] rmdir* (IN path: ARRAY [untagged] OF SHORTCHAR): int;
PROCEDURE [ccall] setsid* (): pid_t;
PROCEDURE [ccall] setuid* (uid: uid_t): int;
PROCEDURE [ccall] sleep* (seconds: unsigned): unsigned;
- PROCEDURE [ccall] swab* (from, to: C99types.Pvoid; n: ssize_t);
+ PROCEDURE [ccall] swab* (from, to: PosixCtypes.Pvoid; n: ssize_t);
PROCEDURE [ccall] symlink* (IN path1, path2: ARRAY [untagged] OF SHORTCHAR): int;
PROCEDURE [ccall] symlinkat* (IN path1: ARRAY [untagged] OF SHORTCHAR; fd: int; IN path2: ARRAY [untagged] OF SHORTCHAR): int;
PROCEDURE [ccall] sync* ;
PROCEDURE [ccall] ttyname_r* (fd: int; VAR buf: ARRAY [untagged] OF SHORTCHAR; buflen: size_t): int;
PROCEDURE [ccall] unlink* (IN path: ARRAY [untagged] OF SHORTCHAR): int;
PROCEDURE [ccall] unlinkat* (fd: int; IN path: ARRAY [untagged] OF SHORTCHAR; flag: int): int;
- PROCEDURE [ccall] write* (fildes: int; buf: C99types.Pvoid; nbyte: size_t): int;
+ PROCEDURE [ccall] write* (fildes: int; buf: PosixCtypes.Pvoid; nbyte: size_t): int;
-END C99unistd.
+END PosixCunistd.
diff --git a/src/native/linux/486/Posix/Mod/Cwctype.cp b/src/native/linux/486/Posix/Mod/Cwctype.cp
--- /dev/null
@@ -0,0 +1,58 @@
+MODULE PosixCwctype ['libc.so.6'];
+
+ (* generated by genposix.sh, do not modify *)
+
+ IMPORT SYSTEM, PosixCtypes, PosixClocale;
+
+ TYPE
+ char* = PosixCtypes.char;
+ signed_char* = PosixCtypes.signed_char;
+ unsigned_char* = PosixCtypes.unsigned_char;
+ short* = PosixCtypes.short;
+ short_int* = PosixCtypes.short_int;
+ signed_short* = PosixCtypes.signed_short;
+ signed_short_int* = PosixCtypes.signed_short_int;
+ unsigned_short* = PosixCtypes.unsigned_short;
+ unsigned_short_int* = PosixCtypes.unsigned_short_int;
+ int* = PosixCtypes.int;
+ signed* = PosixCtypes.signed;
+ signed_int* = PosixCtypes.signed_int;
+ unsigned* = PosixCtypes.unsigned;
+ unsigned_int* = PosixCtypes.unsigned_int;
+ long* = PosixCtypes.long;
+ long_int* = PosixCtypes.long_int;
+ signed_long* = PosixCtypes.signed_long;
+ signed_long_int* = PosixCtypes.signed_long_int;
+ unsigned_long* = PosixCtypes.unsigned_long;
+ unsigned_long_int* = PosixCtypes.unsigned_long_int;
+ long_long* = PosixCtypes.long_long;
+ long_long_int* = PosixCtypes.long_long_int;
+ signed_long_long* = PosixCtypes.signed_long_long;
+ signed_long_long_int* = PosixCtypes.signed_long_long_int;
+ unsigned_long_long* = PosixCtypes.unsigned_long_long;
+ unsigned_long_long_int* = PosixCtypes.unsigned_long_long_int;
+ float* = PosixCtypes.float;
+ double* = PosixCtypes.double;
+ long_double* = PosixCtypes.long_double;
+
+ TYPE
+ wint_t* = INTEGER;
+ wctype_t* = INTEGER;
+
+ TYPE
+ wctrans_t* = INTEGER;
+
+ TYPE
+ locale_t* = PosixClocale.locale_t;
+
+ CONST
+ WEOF* = -1;
+
+ PROCEDURE [ccall] iswalpha* (wc: wint_t): int;
+ PROCEDURE [ccall] iswdigit* (wc: wint_t): int;
+ PROCEDURE [ccall] iswlower* (wc: wint_t): int;
+ PROCEDURE [ccall] iswupper* (wc: wint_t): int;
+ PROCEDURE [ccall] towlower* (wc: wint_t): wint_t;
+ PROCEDURE [ccall] towupper* (wc: wint_t): wint_t;
+
+END PosixCwctype.
diff --git a/src/native/linux/generic/Posix/Mod/Cmacro.cp b/src/native/linux/generic/Posix/Mod/Cmacro.cp
--- /dev/null
@@ -0,0 +1,15 @@
+MODULE PosixCmacro;
+
+ IMPORT SYSTEM, PosixCerrno, PosixCsys_stat;
+
+ PROCEDURE errno* (): PosixCerrno.int;
+ BEGIN
+ RETURN PosixCerrno.__errno_location()[0]
+ END errno;
+
+ PROCEDURE stat* (IN path: ARRAY [untagged] OF SHORTCHAR; VAR buf: PosixCsys_stat.struct_stat): PosixCsys_stat.int;
+ BEGIN
+ RETURN PosixCsys_stat.__xstat(PosixCsys_stat._STAT_VER, path, buf)
+ END stat;
+
+END PosixCmacro.
diff --git a/src/native/linux/generic/System/Mod/Kernel.cp b/src/native/linux/generic/System/Mod/Kernel.cp
index a9b755a338adf082ec523608ebea8c8ceb6a1822..3e0ee50ad30e36e40d85dc4849aff659aa35c0f3 100644 (file)
MODULE Kernel;
- IMPORT S := SYSTEM, stdlib := C99stdlib, stdio := C99stdio,
- time := C99time, wctype := C99wctype, sysmman := C99sys_mman,
- dlfcn := C99dlfcn, types := C99types, fcntl := C99fcntl,
- unistd := C99unistd, signal := C99signal, setjmp := C99setjmp;
+ IMPORT S := SYSTEM, stdlib := PosixCstdlib, stdio := PosixCstdio,
+ time := PosixCtime, wctype := PosixCwctype, sysmman := PosixCsys_mman,
+ dlfcn := PosixCdlfcn, types := PosixCtypes, fcntl := PosixCfcntl,
+ unistd := PosixCunistd, signal := PosixCsignal, setjmp := PosixCsetjmp;
(* init fpu? *)
(* add signal blocking to avoid race conditions in Try/Trap/TrapHandler *)
index 95820c708877ffa96923be53ae54f8d80611bbb3..3db386379326749aa38c2f217b4bdc3bada17db2 100644 (file)
MODULE HostConsole;
- IMPORT S := SYSTEM, Console, HostLang, unistd := C99unistd;
+ IMPORT S := SYSTEM, Console, HostLang, unistd := PosixCunistd;
TYPE
Directory = POINTER TO RECORD (Console.Directory) END;
index 3d7acab950267735d40360d50728f32a1f74bbbc..e0e00d8c986a92e96c351be4411965276884d87e 100644 (file)
MODULE HostDates;
- IMPORT Dates, Strings, time := C99time;
+ IMPORT Dates, Strings, time := PosixCtime;
(* add localization? *)
index 7f5b91dd779c396a7ff8da6211525f3f0b6acd1d..c7026a2b80c675e5f91bf7b457f1d94b1cad450d 100644 (file)
MODULE HostFiles;
- IMPORT S := SYSTEM, Kernel, HostLang, Files, Log, stdlib := C99stdlib,
- unistd := C99unistd, dirent := C99dirent, fcntl := C99fcntl,
- sysstat := C99sys_stat, stdio := C99stdio, errno := C99errno,
- macro := C99macro, libgen := C99libgen, time := C99time;
+ IMPORT S := SYSTEM, Kernel, HostLang, Files, Log, stdlib := PosixCstdlib,
+ unistd := PosixCunistd, dirent := PosixCdirent, fcntl := PosixCfcntl,
+ sysstat := PosixCsys_stat, stdio := PosixCstdio, errno := PosixCerrno,
+ macro := PosixCmacro, libgen := PosixClibgen, time := PosixCtime;
(* !!! add buffer cache *)
index 4a2b3f79f0dbc7e03bfb9eb853cda1a040461355..13fe9871ed2ebb907ce8f1946691e13f78093fc0 100644 (file)
MODULE HostLang;
- IMPORT S := SYSTEM, Kernel, stdlib := C99stdlib, locale := C99locale,
- iconv := C99iconv, errno := C99errno, macro := C99macro;
+ IMPORT S := SYSTEM, Kernel, stdlib := PosixCstdlib, locale := PosixClocale,
+ iconv := PosixCiconv, errno := PosixCerrno, macro := PosixCmacro;
CONST
maxLen = 32;