Fix mktable regexp
This commit is contained in:
parent
28df8b638e
commit
f546e7a1aa
|
@ -56,11 +56,11 @@ sub wanted {
|
||||||
s!//.*!!;
|
s!//.*!!;
|
||||||
$types{$id}="*($_)";
|
$types{$id}="*($_)";
|
||||||
$files{$id}=$File::Find::name;
|
$files{$id}=$File::Find::name;
|
||||||
}elsif (m!^\s*extern\s[^(]* ([\w]+)\s*(\[\w*\]\s*)?;\s*(//.*)?(/\*[^/]*\*/)?$!){
|
}elsif (m!^\s*extern\s[^(]* ([\w]+)\s*(\[[^]]*\]\s*)?;\s*(//.*)?(/\*[^/]*\*/)?$!){
|
||||||
$id=$1;
|
$id=$1;
|
||||||
s/extern //;
|
s/extern //;
|
||||||
my $star="*";
|
my $star="*";
|
||||||
if( s/\[\w*\]//){
|
if( s/\[.*\]//){
|
||||||
$star="";
|
$star="";
|
||||||
};
|
};
|
||||||
s/$id/*/;
|
s/$id/*/;
|
||||||
|
|
|
@ -0,0 +1,3 @@
|
||||||
|
size_t strlen(const char *s);
|
||||||
|
char * strcpy(char * restrict dst, const char * restrict src);
|
||||||
|
void * memcpy(void *dst, const void *src, size_t len);
|
Loading…
Reference in New Issue