Permalink
Browse files

Fix some stuff for castxml

  • Loading branch information...
Skarsnik committed Jan 31, 2018
1 parent fea8e6b commit ad8d580d60f0cfad56734ef5a908d7a0531e83e8
Showing with 9 additions and 6 deletions.
  1. +6 −5 examples/test.h
  2. +2 −1 lib/GPT/DumbGenerator.pm6
  3. +1 −0 lib/GPT/FileFilter.pm6
View
@@ -12,12 +12,13 @@ typedef struct s1 {
float b;
double c;
char *d;
};
} s42;
struct s2 {
s1 a;
struct s1 a;
s42 aa;
my64bits b;
int c[];
int c[99];
double d[4];
};
@@ -28,11 +29,11 @@ struct s3 {
};
void pretty_print(const char *toprint);
void *do_stuff(s1 s,
void *do_stuff(struct s1 s,
size_t piko,
bool b,
const char** const plo
);
int flood(char &ref);
int flood(char *ref);
void testhello(type2 n);
@@ -16,6 +16,7 @@ sub dg-init($allt) is export {
my %ctype-to-p6 = (
'bool' => 'bool',
'_bool' => 'bool',
'_Bool' => 'bool',
'char' => 'int8',
'signed char' => 'int8',
@@ -248,4 +249,4 @@ sub dg-generate-externs is export {
return %toret;
}
}
}
View
@@ -13,6 +13,7 @@ sub files-filter($file-id, $file, @excluded, @selected?, :$context) returns Bool
return False if $basename eq 'errno.h';
return False if $file ~~ /'/usr/include/'.+?'-linux-gnu/bits/'/;
return False if $file ~~ /'/usr/include/'.+?'-linux-gnu/sys/'/;
return False if $file ~~ /'/castxml/clang/include/'/;
if @selected !== Empty {
my @files-list;

0 comments on commit ad8d580

Please sign in to comment.