2 # Copyright (C) 2005-2007, The Perl Foundation.
7 use lib qw( . lib ../lib ../../lib );
9 use Parrot::Test tests => 2;
14 t/dynpmc/sub.t - test if Sub is overridable by .HLL_map
18 % prove t/dynpmc/sub.t
22 Tests the .HLL_map of Sub PMCs. The test is using .SubProxy, which
27 pir_output_is( << 'CODE', << 'OUTPUT', "loadlib" );
30 lib = loadlib "subproxy"
31 unless lib goto not_loaded
41 pir_output_is( << 'CODE', << 'OUTPUT', "test type of HLL_mapped .Sub" );
57 .HLL "Some", "subproxy"
58 .HLL_map "Sub", "SubProxy"
70 # cperl-indent-level: 4
73 # vim: expandtab shiftwidth=4: