Home | History | Annotate | Line # | Download | only in test
      1  1.1  christos # /****************************************************************
      2  1.1  christos # Copyright (C) 1998, 2000 by Lucent Technologies
      3  1.1  christos # All Rights Reserved
      4  1.1  christos #
      5  1.1  christos # Permission to use, copy, modify, and distribute this software and
      6  1.1  christos # its documentation for any purpose and without fee is hereby
      7  1.1  christos # granted, provided that the above copyright notice appear in all
      8  1.1  christos # copies and that both that the copyright notice and this
      9  1.1  christos # permission notice and warranty disclaimer appear in supporting
     10  1.1  christos # documentation, and that the name of Lucent or any of its entities
     11  1.1  christos # not be used in advertising or publicity pertaining to
     12  1.1  christos # distribution of the software without specific, written prior
     13  1.1  christos # permission.
     14  1.1  christos #
     15  1.1  christos # LUCENT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
     16  1.1  christos # INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS.
     17  1.1  christos # IN NO EVENT SHALL LUCENT OR ANY OF ITS ENTITIES BE LIABLE FOR ANY
     18  1.1  christos # SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
     19  1.1  christos # WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER
     20  1.1  christos # IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
     21  1.1  christos # ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF
     22  1.1  christos # THIS SOFTWARE.
     23  1.1  christos #
     24  1.1  christos # ****************************************************************/
     25  1.1  christos 
     26  1.1  christos CC = cc
     27  1.1  christos CFLAGS = -g -I..
     28  1.2  christos CFLAGS+=-I${.CURDIR}/../../arch/${MACHINE_ARCH}/gdtoa
     29  1.1  christos L = -lm
     30  1.2  christos L1 = -lm
     31  1.1  christos #use "L1=-lm" when compiled with -DHonor_FLTP_ROUNDS or -DUSE_LOCALE
     32  1.1  christos INFFIX = | sed 's/[Ii][Nn][Ff][intyINTY]*/Infinity/g'
     33  1.1  christos 
     34  1.2  christos .PATH: /usr/src/lib/libc/gdtoa
     35  1.1  christos 
     36  1.1  christos all: dt dItest ddtest dtest ftest Qtest xLtest xtest ddtestsi dItestsi tests
     37  1.1  christos 
     38  1.1  christos dt = dt.o $A
     39  1.1  christos dt: $(dt)
     40  1.1  christos 	$(CC) -o dt $(dt) $L
     41  1.1  christos 
     42  1.2  christos dItest = dItest.o getround.o g_dfmt.o strtoId.o strtodI.o \
     43  1.2  christos 	g__fmt.o strtoIg.o
     44  1.1  christos dItest: $(dItest)
     45  1.1  christos 	$(CC) -o dItest $(dItest) $(L1)
     46  1.1  christos 
     47  1.2  christos ddtest = ddtest.o getround.o g_dfmt.o strtordd.o strtopdd.o g_ddfmt.o \
     48  1.2  christos 	strtoIdd.o g__fmt.o strtoIg.o
     49  1.1  christos ddtest: $(ddtest)
     50  1.1  christos 	$(CC) -o ddtest $(ddtest) $L
     51  1.1  christos 
     52  1.2  christos dtest = dtest.o getround.o g_dfmt.o strtopd.o strtoId.o \
     53  1.2  christos 	g__fmt.o strtoIg.o
     54  1.1  christos dtest: $(dtest)
     55  1.1  christos 	$(CC) -o dtest $(dtest) $L
     56  1.1  christos 
     57  1.2  christos ftest = ftest.o getround.o strtorf.o strtopf.o g_ffmt.o strtoIf.o \
     58  1.2  christos 	g__fmt.o strtoIg.o
     59  1.1  christos ftest: $(ftest)
     60  1.1  christos 	$(CC) -o ftest $(ftest) $(L1)
     61  1.1  christos 
     62  1.2  christos Qtest = Qtest.o getround.o strtorQ.o g_Qfmt.o strtoIQ.o strtopQ.o \
     63  1.2  christos 	g__fmt.o strtoIg.o
     64  1.1  christos Qtest: $(Qtest)
     65  1.1  christos 	$(CC) -o Qtest $(Qtest) $(L1)
     66  1.1  christos 
     67  1.2  christos xtest = xtest.o getround.o strtorx.o g_xfmt.o strtoIx.o \
     68  1.2  christos 	g__fmt.o strtoIg.o
     69  1.1  christos xtest: $(xtest)
     70  1.1  christos 	$(CC) -o xtest $(xtest) $(L1)
     71  1.1  christos 
     72  1.2  christos xLtest = xLtest.o getround.o strtorxL.o strtopxL.o g_xLfmt.o strtoIxL.o \
     73  1.2  christos 	g__fmt.o strtoIg.o
     74  1.1  christos xLtest: $(xLtest)
     75  1.1  christos 	$(CC) -o xLtest $(xLtest) $(L1)
     76  1.1  christos 
     77  1.2  christos ddtestsi = ddtest.o strtopddSI.o strtorddSI.o strtoIddSI.o getround.o \
     78  1.2  christos 	g_dfmt.o g_ddfmt.o g__fmt.o strtoIg.o
     79  1.1  christos ddtestsi: $(ddtestsi)
     80  1.1  christos 	$(CC) -o ddtestsi $(ddtestsi) $L
     81  1.1  christos 
     82  1.2  christos dItestsi = dItest.o strtodISI.o strtoIdSI.o getround.o \
     83  1.2  christos 	g_dfmt.o g__fmt.o strtoIg.o
     84  1.1  christos dItestsi: $(dItestsi)
     85  1.1  christos 	$(CC) -o dItestsi $(dItestsi) $(L1)
     86  1.1  christos 
     87  1.1  christos strtodt = strtodt.o $A
     88  1.1  christos strtodt: $(strtodt)
     89  1.1  christos 	$(CC) -o strtodt $(strtodt) $L
     90  1.1  christos 
     91  1.1  christos pftest = pftest.o $A
     92  1.2  christos pftest: $(pftest)
     93  1.1  christos 	$(CC) -o pftest $(pftest) $L
     94  1.1  christos 
     95  1.1  christos ## On Intel (and Intel-like) systems using extended-precision registers
     96  1.1  christos ## for double-precision (C type double) computations that sometimes suffer
     97  1.1  christos ## double rounding errors, the test below involving strtodt generally shows
     98  1.1  christos ## five lines of unexpected results.  Variant strtodtnrp uses ../strtodrnp.c
     99  1.1  christos ## (which does all computations in integer arithmetic) and should show no
    100  1.1  christos ## unexpected results.
    101  1.1  christos 
    102  1.2  christos strtodtnrp = strtodt.o strtodnrp.o
    103  1.1  christos strtodtnrp: $(strtodtnrp)
    104  1.1  christos 	$(CC) -o strtodtnrp $(strtodtnrp)
    105  1.1  christos 
    106  1.1  christos # xQtest generates cp commands that depend on sizeof(long double).
    107  1.1  christos # See the source for details.  If you know better, create Q.out,
    108  1.1  christos # x.out and xL.out by copying the relevant *.ou0 or *.ou1 files
    109  1.1  christos # to the corresponding .out files.  In short, the *.ou0 files are
    110  1.1  christos # for long double == double; x.ou1 and xL.ou1 are for
    111  1.1  christos # long double == extended (a la 80x87 and MC680x0), and Q.ou1 is
    112  1.1  christos # for long double == quad.
    113  1.1  christos 
    114  1.1  christos Q.out x.out xL.out:
    115  1.1  christos 	$(CC) -o xQtest xQtest.c
    116  1.1  christos 	./xQtest | sh
    117  1.1  christos 	rm -f xQtest xQtest.o
    118  1.1  christos 
    119  1.1  christos ## The rmdir below will fail if any test results differ.
    120  1.1  christos 
    121  1.1  christos tests: Q.out x.out xL.out dt dItest ddtest dtest ftest Qtest xLtest xtest ddtestsi dItestsi strtodt strtodtnrp
    122  1.1  christos 	mkdir bad
    123  1.1  christos 	cat testnos testnos1 | ./dt $(INFFIX) >zap 2>&1
    124  1.1  christos 	cmp dtst.out zap || mv zap bad/dtst.out
    125  1.1  christos 	./dItest <testnos $(INFFIX) >zap 2>&1
    126  1.1  christos 	cmp dI.out zap || mv zap bad/dI.out
    127  1.1  christos 	./dItestsi <testnos $(INFFIX) >zap 2>&1
    128  1.1  christos 	cmp dIsi.out zap || mv zap bad/dIsi.out
    129  1.1  christos 	./ddtestsi <testnos $(INFFIX) >zap 2>&1
    130  1.1  christos 	cmp ddsi.out zap || mv zap bad/ddsi.out
    131  1.1  christos 	for i in dd d f x xL Q; do cat testnos rtestnos | \
    132  1.1  christos 	 ./"$$i"test $(INFFIX) >zap 2>&1;\
    133  1.1  christos 	cmp $$i.out zap || mv zap bad/$$i.out; done
    134  1.1  christos 	./strtodt testnos3 >bad/strtodt.out && rm bad/strtodt.out || \
    135  1.1  christos 		cat bad/strtodt.out
    136  1.1  christos 	./strtodtnrp testnos3 >bad/strtodtnrp.out && rm bad/strtodtnrp.out || \
    137  1.1  christos 		cat bad/strtodtnrp.out
    138  1.1  christos 	rmdir bad 2>/dev/null || \
    139  1.1  christos 	(cd bad; for i in *; do cmp -s $$i ../obad/$$i && rm $$i;done; cd ..; rmdir bad)
    140  1.1  christos 	touch tests
    141  1.1  christos 
    142  1.1  christos # To test Printf in ../gdtoa.a, "make pf_test" and perhaps "make pf_testLq"
    143  1.1  christos # (if both long double and quad are desired and available).
    144  1.1  christos 
    145  1.1  christos pf_test: pftest
    146  1.1  christos 	./pftest <pftestnos >zap
    147  1.1  christos 	cmp pftest.out zap && rm zap
    148  1.1  christos 
    149  1.1  christos pf_testLq: pftest
    150  1.1  christos 	./pftest <pfLqtestnos >zap
    151  1.1  christos 	cmp pftestLq.out zap && rm zap
    152  1.1  christos 
    153  1.1  christos xs0 = README Q.ou0 Q.ou1 Qtest.c d.out dI.out dIsi.out dItest.c dd.out\
    154  1.1  christos 	 ddsi.out ddtest.c dt.c dtest.c dtst.out f.out ftest.c\
    155  1.1  christos 	 getround.c makefile pfLqtestnos pftest.c pftestQ.out\
    156  1.1  christos 	 pftestx.out pftestLq.out pftestnos rtestnos strtoIdSI.c\
    157  1.1  christos 	 strtoIddSI.c strtodISI.c strtodt.c strtopddSI.c strtorddSI.c\
    158  1.1  christos 	 testnos testnos1 testnos3 x.ou0 x.ou1 xL.ou0 xL.ou1 xLtest.c\
    159  1.1  christos 	 xQtest.c xtest.c
    160  1.1  christos 
    161  1.1  christos # invoke "make -r xsum.out"
    162  1.1  christos xsum.out: xsum0.out $(xs0)
    163  1.1  christos 	xsum $(xs0) >xsum1.out
    164  1.1  christos 	cmp xsum0.out xsum1.out && mv xsum1.out xsum.out || diff xsum[01].out
    165  1.1  christos 
    166  1.1  christos clean:
    167  1.1  christos 	rm -f *.[ao] dt *test *testsi pftest.out strtodt strtodtnrp xsum.out\
    168  1.1  christos 	 xsum1.out tests zap x.out xL.out Q.out
    169  1.1  christos 	rm -rf bad
    170