wok diff linld/stuff/src/CRTLX.H @ rev 20528
linld: pascal convention calls
author | Pascal Bellard <pascal.bellard@slitaz.org> |
---|---|
date | Fri Nov 09 16:37:55 2018 +0100 (2018-11-09) |
parents | f4bc280fe3c4 |
children | 65366955881f |
line diff
1.1 --- a/linld/stuff/src/CRTLX.H Tue Aug 14 22:18:05 2018 +0200 1.2 +++ b/linld/stuff/src/CRTLX.H Fri Nov 09 16:37:55 2018 +0100 1.3 @@ -1,14 +1,16 @@ 1.4 // This file is distributed under GPL 1.5 // 1.6 -#define NULL 0 1.7 -extern "C" char* strcpy(const char* a,const char* b); 1.8 -extern "C" char* strcat(const char* a,const char* b); 1.9 -extern "C" int strcmp(const char* a,const char* b); 1.10 -extern "C" char* strstr(const char* a,const char* b); 1.11 +extern pascal void strcpy(const char* a,const char* b); 1.12 +extern pascal void strcat(const char* a,const char* b); 1.13 +extern pascal int strcmp(const char* a,const char* b); 1.14 +//extern "C" char* strstr(const char* a,const char* b); 1.15 +extern pascal int strstr(const char* a,const char* b); 1.16 extern "C" char *progname(void); 1.17 -extern "C" void chdirname(char *path); 1.18 -extern "C" unsigned long kver2ul(char *kernel_version); 1.19 -extern "C" char *ultoa(unsigned long n); 1.20 +extern pascal void chdirname(char *path); 1.21 +extern pascal unsigned long kver2ul(char *kernel_version); 1.22 +//extern "C" char *ultoa(unsigned long n); 1.23 +extern pascal int ultoa(unsigned long n); 1.24 extern "C" void try_default_args(); 1.25 extern char cpu_features[]; 1.26 -#define cpuhaslm() (cpu_features[3]&0x20) 1.27 +#define CPUMASKLM (0x20) 1.28 +#define cpuhaslm() (cpu_features[3]&CPUMASKLM)