Changeset 3faeba in git for factory/ftest/ftest_util.m4


Ignore:
Timestamp:
Feb 19, 1998, 4:10:07 PM (26 years ago)
Author:
Jens Schmidt <schmidt@…>
Branches:
(u'spielwiese', '82fc009ea2b0098c1a4896c841bb70860976bdfc')
Children:
b257014f6f377126c7f9a83d3507e0359642b730
Parents:
4f75c36732ca1d4ce09ccab17196480bd0e5bcc0
Message:
	* ftest_util.m4: `#line' preprocessor directives added to most of
	  the macros (that's cool, man!)

	* ftest_util.m4 (ftestSetEnv): macro removed


git-svn-id: file:///usr/local/Singular/svn/trunk@1160 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed
  • factory/ftest/ftest_util.m4

    r4f75c3 r3faeba  
    1 dnl $Id: ftest_util.m4,v 1.14 1997-12-17 12:16:11 schmidt Exp $
     1dnl $Id: ftest_util.m4,v 1.15 1998-02-19 15:10:07 schmidt Exp $
    22dnl
    33dnl ftest_util.m4 - m4 macros used by the factory test environment.
     
    55dnl "External" macro start with prefix `ftest', "internal" macros
    66dnl with prefix `_'.
     7dnl
     8dnl Almost all macros insert `#line'-preprocessor directives into
     9dnl code to aid debugging.
    710dnl
    811dnl Note: Be carefull where to place the ';'!
     
    5861define(`ftestPreprocInit', `dnl
    5962changecom(`//')dnl
     63`#line' __line__ "__file__"
    6064`#include <unistd.h>
    6165
     
    6670
    6771#include "ftest_util.h"
    68 #include "ftest_io.h"
    69 '')
     72#include "ftest_io.h"'
     73dnl')
    7074
    7175#
     
    7377#
    7478define(`ftestGlobalInit', `dnl
     79`#line' __line__ "__file__"
    7580`TIMING_DEFINE_PRINT( ftestTimer )'')
    7681
     
    8287#
    8388define(`ftestMainInit', `dnl
    84 `int optind = 0;
     89`#line' __line__ "__file__"
     90    `int optind = 0;
    8591    ftestStatusT check = UndefinedResult;
    8692
     
    9298    }
    9399
    94     ftestSignalCatch()'')
     100    ftestSignalCatch();
     101    #line' __line__ "__file__"
     102dnl')
    95103
    96104#
     
    98106#
    99107define(`ftestMainExit', `dnl
    100 `return check'')
     108`#line' __line__ "__file__"
     109    `return check'')
    101110
    102111#
     
    142151#
    143152define(`ftestGetOpts', `dnl
    144 `ftestGetOpts( argc, argv, optind )'')
     153`#line' __line__ "__file__"
     154    `ftestGetOpts( argc, argv, optind )'')
    145155
    146156#
     
    150160#
    151161define(`ftestGetEnv', `dnl
    152 `ftestGetEnv( argc, argv, optind );
     162`#line' __line__ "__file__"
     163    `ftestGetEnv( argc, argv, optind );
    153164
    154165    ftestPrintEnv()'')
     
    176187        ftestError( CommandlineError,
    177188                    "expected '_stripTWS(`_ftestInType_$1')` at position %d in commandline\n",
    178                     optind )'',
     189                    optind );'',
    179190  ``if ( argv[ optind ] ) {
    180191        ftestArgGiven$1 = true;
    181192        $1 = ftestGet'_stripTWS(`_ftestInType_$1')`( argv[ optind++ ] );
    182193    } else
    183         $1 = '_qstripTWS(`$2')')')
     194        $1 = '_qstripTWS(`$2')`;'')
     195    `#line' __line__ "__file__"
     196
     197dnl')
    184198
    185199#
     
    200214#
    201215define(`ftestRun', `dnl
    202 `// save random generator seed now since the algorithm
     216`#line' __line__ "__file__"
     217    `// save random generator seed now since the algorithm
    203218    // most likely is going to change it
    204219    ftestWriteSeed();
     
    221236#
    222237define(`ftestCheck', `dnl
    223 `if ( ftestCheckFlag )
     238`#line' __line__ "__file__"
     239    `if ( ftestCheckFlag )
    224240        check = '_qstripTWS(`$1')')
    225241
     
    240256
    241257define(`ftestOutput', `dnl
    242 `ftestPrintTimer( timing_ftestTimer_time );
     258`#line' __line__ "__file__"
     259    `ftestPrintTimer( timing_ftestTimer_time );
    243260    ftestPrintCheck( check )'_ftestOutput($@)')
    244 
    245 #
    246 # ftestSetEnv() - set factory environment.
    247 #
    248 # This macro is quite spurious, but I keep it for future
    249 # use.
    250 #
    251 define(`ftestSetEnv', `dnl
    252 `ftestSetEnv();
    253     ftestPrintEnv()'')
    254261
    255262dnl switch on output again
Note: See TracChangeset for help on using the changeset viewer.