Skip to content

Instantly share code, notes, and snippets.

@FROGGS
Created April 4, 2015 19:12
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
Star You must be signed in to star a gist
Save FROGGS/dfd3880da345f37348c9 to your computer and use it in GitHub Desktop.
$ perl6 t/04-nativecall/15-rw-args.t
1..10
ok 1 - Perl's rw variable was set by C (char)
ok 2 - Perl's rw variable was set by C (short)
ok 3 - Perl's rw variable was set by C (long)
ok 4 - Perl's rw variable was set by C (long long)
ok 5 - Perl's rw variable was set by C (float)
ok 6 - Perl's rw variable was set by C (double)
not ok 7 - Perl's rw variable was set by C (unsigned char)# TODO unsigned char comes back as signed
# Failed test 'Perl's rw variable was set by C (unsigned char)'
# at t/04-nativecall/15-rw-args.t line 42
# expected: '153'
# got: '-103'
ok 8 - Perl's rw variable was set by C (unsigned short)
ok 9 - Perl's rw variable was set by C (unsigned long)
ok 10 - Perl's rw variable was set by C (unsigned long long)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment