Changeset 52f85e0 for src/libcfa/stdlib.c

Timestamp:

Feb 10, 2016, 3:57:00 PM (9 years ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

ADT, aaron-thesis, arm-eh, ast-experimental, cleanup-dtors, ctor, deferred_resn, demangler, enum, forall-pointer-decay, gc_noraii, jacob/cs343-translation, jenkins-sandbox, master, memory, new-ast, new-ast-unique-expr, new-env, no_list, persistent-indexer, pthread-emulation, qualifiedEnum, resolv-new, string, with_gc

Children:

6ba0659, cce7872

Parents:

bd85400

Message:

syslib updates and examples, formatting, make double 0 work

File:

• src/libcfa/stdlib.c (modified) (3 diffs)

src/libcfa/stdlib.c

@@ -10 +10 @@
 // Created On       : Thu Jan 28 17:10:29 2016
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Fri Feb  5 15:41:24 2016
-// Update Count     : 128
+// Last Modified On : Wed Feb 10 15:45:56 2016
+// Update Count     : 140
 //
 
@@ -23 +23 @@
 #include <string.h>                                                                             // memset
 #include <malloc.h>                                                                             // malloc_usable_size
-#include <stdio.h>
 #include <math.h>                                                                               // fabsf, fabs, fabsl
 #include <complex.h>                                                                    // _Complex_I, cabsf, cabs, cabsl
@@ -106 +105 @@
 long int ato( const char * ptr ) {
         long int li;
-        if ( sscanf( ptr, "%ld", &li ) == EOF ) {};                     // check return code
+        if ( sscanf( ptr, "%ld", &li ) == EOF ) {}                      // check return code
         return li;
 }
 unsigned long int ato( const char * ptr ) {
         unsigned long int uli;
-        if ( sscanf( ptr, "%lu", &uli ) == EOF ) {};            // check return code
+        if ( sscanf( ptr, "%lu", &uli ) == EOF ) {}                     // check return code
         return uli;
 }
 long long int ato( const char * ptr ) {
         long long int lli;
-        if ( sscanf( ptr, "%lld", &lli ) == EOF ) {};           // check return code
+        if ( sscanf( ptr, "%lld", &lli ) == EOF ) {}            // check return code
         return lli;
 }
 unsigned long long int ato( const char * ptr ) {
         unsigned long long int ulli;
-        if ( sscanf( ptr, "%llu", &ulli ) == EOF ) {};          // check return code
+        if ( sscanf( ptr, "%llu", &ulli ) == EOF ) {}           // check return code
         return ulli;
 }
 float ato( const char * ptr ) {
         float f;
-        if ( sscanf( ptr, "%f", &f ) == EOF ) {};                       // check return code
+        if ( sscanf( ptr, "%f", &f ) == EOF ) {}                        // check return code
         return f;
 }
 double ato( const char * ptr ) {
         double d;
-        if ( sscanf( ptr, "%lf", &d ) == EOF ) {};                      // check return code
+        if ( sscanf( ptr, "%lf", &d ) == EOF ) {}                       // check return code
         return d;
 }
 long double ato( const char * ptr ) {
         long double ld;
-        printf( "FRED " );
-        if ( sscanf( ptr, "%.32Lf", &ld ) == EOF ) {};          // check return code
+        if ( sscanf( ptr, "%Lf", &ld ) == EOF ) {}                      // check return code
         return ld;
 }
 float _Complex ato( const char * ptr ) {
         float re, im;
-        if ( sscanf( ptr, "%g%g", &re, &im ) == EOF ) {};       // check return code
+        if ( sscanf( ptr, "%g%gi", &re, &im ) == EOF ) {}       // check return code
         return re + im * _Complex_I;
 }
 double _Complex ato( const char * ptr ) {
         double re, im;
-        if ( sscanf( ptr, "%.16lg%.16lg", &re, &im ) == EOF ) {}; // check return code
+        if ( sscanf( ptr, "%lf%lfi", &re, &im ) == EOF ) {} // check return code
         return re + im * _Complex_I;
 }
 long double _Complex ato( const char * ptr ) {
         long double re, im;
-        if ( sscanf( ptr, "%.32Lg%.32Lg", &re, &im ) == EOF ) {}; // check return code
+        if ( sscanf( ptr, "%Lf%Lfi", &re, &im ) == EOF ) {}     // check return code
         return re + im * _Complex_I;
 }