Changeset ac6554 in git for Singular/LIB/tst.lib
- Timestamp:
- May 15, 1998, 6:18:19 PM (25 years ago)
- Branches:
- (u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')
- Children:
- ebecf83da487f4114cc92e8fb8979e46d7ee9f26
- Parents:
- 779b9b7027631ab801b2b12ff6a451246abe4541
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/tst.lib
r779b9b7 rac6554 1 // $Id: tst.lib,v 1. 5 1998-05-14 18:45:19 SingularExp $1 // $Id: tst.lib,v 1.6 1998-05-15 16:18:19 obachman Exp $ 2 2 //(obachman, last modified 2/13/98) 3 3 /////////////////////////////////////////////////////////////////////////////// 4 4 5 version="$Id: tst.lib,v 1. 5 1998-05-14 18:45:19 SingularExp $";5 version="$Id: tst.lib,v 1.6 1998-05-15 16:18:19 obachman Exp $"; 6 6 info=" 7 7 LIBRARY: tst.lib PROCEDURES FOR RUNNING AUTOMATIC TST TESTS … … 18 18 proc tst_system(string s) 19 19 "USAGE: tst_system(s); s string 20 RETURN: string which is stdout \x and stderr of system(\"sh\", s) 21 EXAMPLE: example tst_system; shows examples 22 " 20 RETURN: string which is stdout and stderr of system(\"sh\", s) 21 EXAMPLE: example tst_system; shows examples" 23 22 { 24 23 string tmpfile = "/tmp/tst_" + string(system("pid")); … … 62 61 "Error tst_ignore: Wrong number of arguments"; 63 62 "Usage: tst_ignore (any,[keyword], [link]);"; 64 return ;63 return(); 65 64 } 66 65 … … 89 88 "Error tst_ignore: Keyword must be a string"; 90 89 "Usage: tst_ignore (any,[keyword], [link]);"; 91 return ;90 return(); 92 91 } 93 92 if (keyword == "time" || keyword == "memory") … … 112 111 outlink; 113 112 "Usage: tst_ignore (any,[keyword], [link]);"; 114 return ;113 return(); 115 114 } 116 115
Note: See TracChangeset
for help on using the changeset viewer.