Lines Matching refs:expect
76 expect($ac);
79 expect($ac);
82 expect($ac);
83 expect(join("-", @a), "Gold$:-Frankincense$:-Myrrh$:");
86 expect(!$ac);
87 expect(join("-", @a), "Gold-Frankincense-Myrrh");
92 expect(join("-", @sr), "Gold-Frankincense");
97 expect($a1, "Myrrh");
98 expect($a2, "Myrrh");
139 sub expect {
158 die "expect() got ", scalar(@_), " args, should have been 1 or 2";