Changeset 43

Timestamp:

Mar 30, 2018, 10:15:10 PM (7 years ago)

Author:

Alex Taylor

Message:

Minor code cleanup

Location:

rxutilex/trunk

Files:

• . (modified) (1 prop)
• rxutilex.c (modified) (5 diffs)
• rxutilex.def (modified) (1 diff)

rxutilex/trunk/rxutilex.c

@@ -102 +102 @@
 
     static const char *PSZ_ZERO = "0";
-    static const char *PSZ_ONE = "1";
+    static const char *PSZ_ONE  = "1";
 #endif
 
@@ -113 +113 @@
 #define US_PIPESTATUS_MAXZ      128                                  // ...of a pipe status string
 #define US_DISKINFO_MAXZ        128                                  // ...of a disk information string
+#define US_FRACSTR_MAXZ         21                                   // ...of a fraction string
 
 #define UL_SSBUFSIZE            0xFFFF      // Buffer size for the DosQuerySysState() data
@@ -1071 +1072 @@
  * REXX ARGUMENTS:                                                           *
  *   1. Number to be formatted.                                   (REQUIRED) *
- *   2. Number of decimal places to use for floating point                   *
- *      values.  Ignored for integer values.                    (DEFAULT: 2) *
+ *   2. Number of decimal places to use for floating point values            *
+ *      (max 18).  Ignored for integer values.                  (DEFAULT: 2) *
  *                                                                           *
  * REXX RETURN VALUE: The formatted number, or "" on error.                  *
@@ -1087 +1088 @@
     int   iVal;                         // Input value as integer
 #else
-    LONGLONG    llVal  = 0;
-    long double ldVal  = 0,
-                ldFrac = 0;
-    PSZ         p,
-                a;
-    BOOL        bNeg   = FALSE;
-    CHAR        achFrac[ 16 ];
-    int         rc     = 0;
+    LONGLONG    llVal  = 0;             // Input value as integer
+    long double ldVal  = 0,             // Input value as floating point
+                ldFrac = 0;             // Input fraction portion
+    PSZ   p,                            // Pointer to fraction
+          a;                            // Pointer to absolute value
+    CHAR  achFrac[ US_FRACSTR_MAXZ ];   // Fraction portion as string
+    int   rc = 0;
 #endif
 
@@ -1219 +1219 @@
         {
             // Use user-specified precision
+            if ( iPrec > 18 ) iPrec = 18;
             sprintf( achFrac, "%.*Lf", iPrec, ldFrac );
         }

rxutilex/trunk/rxutilex.def

@@ -1 +1 @@
 LIBRARY     RXUTILEX INITINSTANCE TERMINSTANCE
 DATA        MULTIPLE NONSHARED
-DESCRIPTION '@#Alex Taylor:0.1.6#@##1## 30 Mar 2018 14:26:03     REINFORCE::::::@@Extended REXX Utility Functions'
+DESCRIPTION '@#Alex Taylor:0.1.6#@##1## 30 Mar 2018 16:11:36     REINFORCE::::::@@Extended REXX Utility Functions'
 
 EXPORTS     Sys2LoadFuncs