Lines Matching defs:t_api
18 # $Id: t_api.pl,v 1.10 2007/06/19 23:46:59 tbox Exp $
28 package t_api;
34 package t_api;
41 package t_api;
47 package t_api;
52 package t_api;
109 $t_api'T_inresult = 0;
110 $t_api'T_aborted = 0;
111 $t_api'T_timedout = 0;
112 $t_api'T_terminated = 0;
113 $t_api'T_unresolved = 0;
115 alarm($t_api'T_timeout);
120 &t_info("The test case timed out\n") if ($t_api'T_timedout);
121 &t_info("The test case was terminated\n") if ($t_api'T_terminated);
122 &t_info("The test case was aborted\n") if ($t_api'T_aborted);
125 elsif (! $t_api'T_inresult) {
186 $SIG{'ABRT'} = 't_api\'t_on_abort';
187 $SIG{'ALRM'} = 't_api\'t_on_alarm';
188 $SIG{'INT'} = 't_api\'t_on_int';
189 $SIG{'QUIT'} = 't_api\'t_on_int';