Lines Matching refs:result
38 $result = do foo1(1);40 ok( $result eq 'value', ":$result: eq :value:" );44 $result = do foo2(0,1,0);45 ok( $result eq 'value', ":$result: eq :value:" );48 $result = do{ ok 1; 'value';};49 ok( $result eq 'value', ":$result: eq :value:" );95 ok( $#t == 0, "empty do result value" );