Skip to content

Instantly share code, notes, and snippets.

@Skarsnik

Skarsnik/weird Secret

Created August 30, 2017 16:51
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save Skarsnik/b90dbc7ea81001c53822241b95b87a91 to your computer and use it in GitHub Desktop.
Save Skarsnik/b90dbc7ea81001c53822241b95b87a91 to your computer and use it in GitHub Desktop.
skarsnik@vps300582:/tmp/gptrixie$ perl6 -I ../exemel/lib/ -I lib bin/gptrixie --all /usr/local/include/gumbo.h
...
sub gumbo_normalized_tagname(int32 $tag) is native(LIB) returns Pointer[int8] is export { * }
sub gumbo_string_equals_ignore_case(Pointer[GumboStringPiece] $str1, Pointer[GumboStringPiece] $str2) is native(LIB) returns bool is export { * }
sub gumbo_tag_from_original_text(Pointer[GumboStringPiece] $text) is native(LIB) is export { * }
sub gumbo_vector_index_of(Pointer[GumboVector] $vector, Pointer[] $element) is native(LIB) returns int32 is export { * }
sub gumbo_tagn_enum(Pointer[int8] $tagname, uint32 $length) is native(LIB) returns int32 is export { * }
sub gumbo_parse(Pointer[int8] $buffer) is native(LIB) returns Pointer[GumboInternalOutput] is export { * }
sub gumbo_tag_enum(Pointer[int8] $tagname) is native(LIB) returns int32 is export { * }
sub gumbo_string_equals(Pointer[GumboStringPiece] $str1, Pointer[GumboStringPiece] $str2) is native(LIB) returns bool is export { * }
sub gumbo_normalize_svg_tagname(Pointer[GumboStringPiece] $tagname) is native(LIB) returns Pointer[int8] is export { * }
sub gumbo_parse_with_options(Pointer[GumboInternalOptions] $options, Pointer[int8] $buffer, size_t $buffer_length) is native(LIB) returns Pointer[GumboInternalOutput] is export { * }
## Externs
our GumboInternalOptions $kGumboDefaultOptions is export = cglobals(LIB, "kGumboDefaultOptions", GumboInternalOptions);
our GumboStringPiece $kGumboEmptyString is export = cglobals(LIB, "kGumboEmptyString", GumboStringPiece);
our GumboVector $kGumboEmptyVector is export = cglobals(LIB, "kGumboEmptyVector", GumboVector);
our GumboSourcePosition $kGumboEmptySourcePosition is export = cglobals(LIB, "kGumboEmptySourcePosition", GumboSourcePosition);
skarsnik@vps300582:/tmp/gptrixie$ perl6 -I lib bin/gptrixie --all /usr/local/include/gumbo.h
BEGIN
Calling GCCXML : gccxml /usr/local/include/gumbo.h -fxml=plop.xml
Parsing the XML file
Segmentation fault
skarsnik@vps300582:/tmp/gptrixie$ perl6 -I ../exemel/lib/ -I lib bin/gptrixie --all /usr/local/include/gumbo.h
BEGIN
Segmentation fault
skarsnik@vps300582:/tmp/gptrixie$ perl6 -I ../exemel/lib/ -I lib bin/gptrixie --all /usr/local/include/gumbo.h
BEGIN
Segmentation fault
skarsnik@vps300582:/tmp/gptrixie$ perl6 -I lib bin/gptrixie --all /usr/local/include/gumbo.h
BEGIN
Segmentation fault
skarsnik@vps300582:/tmp/gptrixie$ perl6 --version
This is Rakudo version 2017.08 built on MoarVM version 2017.08.1
implementing Perl 6.c.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment