Skip to content
This repository
Fetching contributors…

Cannot retrieve contributors at this time

file 13 lines (8 sloc) 0.202 kb
1 2 3 4 5 6 7 8 9 10 11 12 13
use t::CompileTestLib;
use NativeCall;

say "1..2";

compile_test_lib('01-argless');

sub Argless() is native('./01-argless') { * }

# This emits the "ok 1"
Argless();

say("ok 2 - survived the call");
Something went wrong with that request. Please try again.