Changes in tests/ato.cfa [33807a1e:200fcb3]
- File:
-
- 1 edited
-
tests/ato.cfa (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
tests/ato.cfa
r33807a1e r200fcb3 10 10 // Created On : Thu Feb 4 08:10:57 2016 11 11 // Last Modified By : Peter A. Buhr 12 // Last Modified On : Fri Mar 15 17:58:35 202413 // Update Count : 14512 // Last Modified On : Tue Dec 4 21:33:53 2018 13 // Update Count : 92 14 14 // 15 15 … … 18 18 19 19 int main( void ) { 20 // ato21 22 20 const char * sptr = "-123"; 23 21 int i = ato( sptr ); … … 34 32 sout | uli | sptr; 35 33 36 sptr = " -123 "; // spaces allowed34 sptr = "-123"; 37 35 long long int lli = ato( sptr ); 38 36 sout | lli | sptr; 39 sptr = " 123 "; // spaces allowed37 sptr = "123"; 40 38 unsigned long long int ulli = ato( sptr ); 41 39 sout | ulli | sptr; … … 47 45 double d = ato( sptr ); 48 46 sout | d | sptr; 49 sptr = " -123.45678901234567890123456789 "; // spaces allowed47 sptr = "-123.45678901234567890123456789"; 50 48 long double ld = ato( sptr ); 51 49 sout | ld | sptr; … … 60 58 long double _Complex ldc = ato( sptr ); 61 59 sout | ldc | sptr; 62 sptr = " 123.45678901234 -123.4567890i "; // spaces allowed60 sptr = "123.45678901234-123.4567890i"; 63 61 long double _Complex ldc2 = ato( sptr ); 64 62 sout | ldc2 | sptr; 65 63 66 // strto67 64 68 65 sptr = "-123"; 69 i = strto( sptr, 0 p, 10 );66 i = strto( sptr, 0, 10 ); 70 67 sout | i | sptr; 71 68 sptr = "123"; 72 ui = strto( sptr, 0 p, 10 );69 ui = strto( sptr, 0, 10 ); 73 70 sout | ui | sptr; 74 71 75 72 sptr = "-123"; 76 li = strto( sptr, 0 p, 10 );73 li = strto( sptr, 0, 10 ); 77 74 sout | li | sptr; 78 75 sptr = "123"; 79 uli = strto( sptr, 0 p, 10 );76 uli = strto( sptr, 0, 10 ); 80 77 sout | uli | sptr; 81 78 82 sptr = " -123 "; // spaces allowed83 lli = strto( sptr, 0 p, 10 );79 sptr = "-123"; 80 lli = strto( sptr, 0, 10 ); 84 81 sout | lli | sptr; 85 sptr = " 123 "; // spaces allowed86 ulli = strto( sptr, 0 p, 10 );82 sptr = "123"; 83 ulli = strto( sptr, 0, 10 ); 87 84 sout | ulli | sptr; 88 85 89 86 sptr = "-123.456"; 90 f = strto( sptr, 0 p);87 f = strto( sptr, 0 ); 91 88 sout | f | sptr; 92 89 sptr = "-123.4567890123456"; 93 d = strto( sptr, 0 p);90 d = strto( sptr, 0 ); 94 91 sout | d | sptr; 95 sptr = " -123.45678901234567890123456789 "; // spaces allowed96 ld = strto( sptr, 0 p);92 sptr = "-123.45678901234567890123456789"; 93 ld = strto( sptr, 0 ); 97 94 sout | ld | sptr; 98 95 99 96 sptr = "-123.456-123.456i"; 100 fc = strto( sptr, 0 p);97 fc = strto( sptr, 0 ); 101 98 sout | fc | sptr; 99 100 char * eptr = 0; 101 // sptr = "2fred"; 102 // fc = strto( sptr, &eptr ); 103 // sout | fc | sptr | eptr; 104 105 sptr = "2 3"; 106 fc = strto( sptr, &eptr ); 107 sout | fc | sptr | eptr; 108 102 109 sptr = "-123.4567890123456+123.4567890123456i"; 103 dc = strto( sptr, 0 p);110 dc = strto( sptr, 0 ); 104 111 sout | dc | sptr; 105 112 sptr = "123.45678901234567890123456789-123.45678901234567890123456789i"; 106 ldc = strto( sptr, 0p ); 107 sout | ldc | sptr; 108 sptr = " 123.45678901234 -123.4567890i "; // spaces allowed 109 ldc2 = strto( sptr, 0p ); 110 sout | ldc2 | sptr; 111 112 sptr = "2.0fred"; 113 char * eptr = 0p; 114 errno = 0; // reset 115 f = strto( sptr, &eptr ); 116 if ( errno == ERANGE ) sout | "out of range"; 117 if ( eptr == sptr || // conversion failed, no characters generated 118 *eptr != '\0' ) sout | "invalid argument" | sptr; // not at end of str ? 119 else assert( false ); 120 121 sptr = "2 3x"; 122 eptr = 0p; 123 errno = 0; // reset 124 fc = strto( sptr, &eptr ); 125 if ( errno == ERANGE ) sout | "out of range"; 126 if ( eptr == sptr || // conversion failed, no characters generated 127 *eptr != '\0' ) sout | "invalid argument" | sptr; // not at end of str ? 128 else assert( false ); 129 130 // convert 131 132 sptr = "-123"; 133 i = convert( sptr ); 134 sout | i | sptr; 135 sptr = "123"; 136 ui = convert( sptr ); 137 sout | ui | sptr; 138 139 sptr = "-123"; 140 li = convert( sptr ); 141 sout | li | sptr; 142 sptr = "123"; 143 uli = convert( sptr ); 144 sout | uli | sptr; 145 146 sptr = " -123 "; // spaces allowed 147 lli = convert( sptr ); 148 sout | lli | sptr; 149 sptr = " 123 "; // spaces allowed 150 ulli = convert( sptr ); 151 sout | ulli | sptr; 152 153 sptr = "-123.456"; 154 f = convert( sptr ); 155 sout | f | sptr; 156 sptr = "-123.4567890123456"; 157 d = convert( sptr ); 158 sout | d | sptr; 159 sptr = " -123.45678901234567890123456789 "; // spaces allowed 160 ld = convert( sptr ); 161 sout | ld | sptr; 162 163 sptr = "-123.456-123.456i"; 164 fc = convert( sptr ); 165 sout | fc | sptr; 166 sptr = "-123.4567890123456+123.4567890123456i"; 167 dc = convert( sptr ); 168 sout | dc | sptr; 169 sptr = "123.45678901234567890123456789-123.45678901234567890123456789i"; 170 ldc = convert( sptr ); 113 ldc = strto( sptr, 0 ); 171 114 sout | ldc | sptr; 172 115 sptr = "123.45678901234-123.4567890i"; 173 ldc2 = convert( sptr);116 ldc2 = strto( sptr, 0 ); 174 117 sout | ldc2 | sptr; 175 176 sptr = "2.0fred";177 try {178 f = convert( sptr );179 assert( false );180 } catch( invalid_argument * ) {181 sout | "invalid argument" | sptr;182 } // try183 184 sptr = "2 3x";185 try {186 fc = convert( sptr );187 assert( false );188 } catch( invalid_argument * ) {189 sout | "invalid argument" | sptr;190 } // try191 118 } // main 192 119
Note:
See TracChangeset
for help on using the changeset viewer.
