]> git.karo-electronics.de Git - karo-tx-redboot.git/blob - packages/language/c/libm/v2_0/tests/vectors/pow.c
Initial revision
[karo-tx-redboot.git] / packages / language / c / libm / v2_0 / tests / vectors / pow.c
1 //===========================================================================
2 //
3 //      pow.c
4 //
5 //      Test of pow() math library function
6 //
7 //===========================================================================
8 //####ECOSGPLCOPYRIGHTBEGIN####
9 // -------------------------------------------
10 // This file is part of eCos, the Embedded Configurable Operating System.
11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
12 //
13 // eCos is free software; you can redistribute it and/or modify it under
14 // the terms of the GNU General Public License as published by the Free
15 // Software Foundation; either version 2 or (at your option) any later version.
16 //
17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
19 // FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
20 // for more details.
21 //
22 // You should have received a copy of the GNU General Public License along
23 // with eCos; if not, write to the Free Software Foundation, Inc.,
24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
25 //
26 // As a special exception, if other files instantiate templates or use macros
27 // or inline functions from this file, or you compile this file and link it
28 // with other works to produce a work based on this file, this file does not
29 // by itself cause the resulting work to be covered by the GNU General Public
30 // License. However the source code for this file must still be made available
31 // in accordance with section (3) of the GNU General Public License.
32 //
33 // This exception does not invalidate any other reasons why a work based on
34 // this file might be covered by the GNU General Public License.
35 //
36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
37 // at http://sources.redhat.com/ecos/ecos-license/
38 // -------------------------------------------
39 //####ECOSGPLCOPYRIGHTEND####
40 //===========================================================================
41 //#####DESCRIPTIONBEGIN####
42 //
43 // Author(s):   jlarmour
44 // Contributors:  jlarmour
45 // Date:        1998-02-13
46 // Purpose:     
47 // Description: 
48 // Usage:       
49 //
50 //####DESCRIPTIONEND####
51 //
52 //===========================================================================
53
54 // Declarations for test system:
55 //
56 // TESTCASE_TYPE=CYG_TEST_MODULE
57
58
59 // CONFIGURATION
60
61 #include <pkgconf/libm.h>   // Configuration header
62
63
64 // INCLUDES
65
66 #include <cyg/infra/cyg_type.h>    // Common type definitions and support
67 #include <cyg/infra/testcase.h>    // Test infrastructure
68 #include <math.h>                  // Header for this package
69 #include <sys/ieeefp.h>            // Cyg_libm_ieee_double_shape_type
70 #include "vectors/vector_support.h"// extra support for math tests
71
72 #include "vectors/pow.h"
73
74 // FUNCTIONS
75
76 static void
77 test( CYG_ADDRWORD data )
78 {
79     cyg_ucount32 vec_size;
80     cyg_bool ret;
81
82     vec_size = sizeof(pow_vec) / sizeof(Cyg_libm_test_double_vec_t);
83     ret = doTestVec( (CYG_ADDRWORD) &pow, CYG_LIBM_TEST_VEC_DOUBLE,
84                      CYG_LIBM_TEST_VEC_DOUBLE,
85                      CYG_LIBM_TEST_VEC_DOUBLE,
86                      &pow_vec[0], vec_size );
87     
88     if (ret==true) {
89         CYG_TEST_PASS("pow() is stable");
90     } // if
91     else {
92         CYG_TEST_FAIL("pow() failed tests");
93     } // else
94
95     CYG_TEST_FINISH("Finished tests from testcase " __FILE__ " for Math "
96                     "library pow() function");
97 } // test()
98
99
100 int
101 main(int argc, char *argv[])
102 {
103     CYG_TEST_INIT();
104
105     CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for Math library "
106                   "pow() function");
107
108     START_TEST( test );
109
110     CYG_TEST_PASS_FINISH("Testing is not applicable to this configuration");
111
112 } // main()
113
114
115 // EOF pow.c