2 # Copyright (C) 2006-2008, Parrot Foundation.
7 t/pmc/sockaddr.t - test the Sockaddr PMC
11 % prove t/pmc/sockaddr.t
15 Test the Sockaddr PMC.
20 .include 'test_more.pir'
25 ok(1, 'Instantiated a Socket PMC')
27 $P1 = $P0."sockaddr"("localhost", 1234)
28 ok(1, 'socket.sockaddr method successful')
32 ok($I0, 'Sockaddr PMC created')
34 is($S0, 'Sockaddr', 'PMC has correct type')
41 # vim: expandtab shiftwidth=4 ft=pir: