/[dejagnu]/dejagnu/testsuite/runtest.all/default_procs.tcl
ViewVC logotype

Diff of /dejagnu/testsuite/runtest.all/default_procs.tcl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1.1.1 by rsavoye, Mon Feb 5 04:33:04 2001 UTC revision 1.2 by bje, Sun Aug 17 23:00:09 2003 UTC
# Line 17  proc lib_pat_test { cmd arg pattern } { Line 17  proc lib_pat_test { cmd arg pattern } {
17      }      }
18  }  }
19                    
20  # this tests a proc for a returned value  # this tests a proc for a returned value
21  proc lib_ret_test { cmd arg val } {  proc lib_ret_test { cmd arg val } {
22      catch "$cmd \"$arg\"" result      catch "$cmd \"$arg\"" result
23  #    catch "set result [$cmd $arg]" output  #    catch "set result [$cmd $arg]" output

Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26