Change NUMVAL_FMT to FLOATVAL_FMT.

Courtesy of "David M. Lloyd" <dmlloyd@tds.net> git-svn-id: https://svn.parrot.org/parrot/trunk@832 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
parrot · Jan 13, 2002 · 3e12d79 · 3e12d79
1 parent d58e1a4
commit 3e12d79
Show file tree

Hide file tree

Showing 5 changed files with 10 additions and 10 deletions.
diff --git a/Configure.pl b/Configure.pl
@@ -171,7 +171,7 @@ END
     longsize      => undef,
 
     intvalfmt     => '%ld',
-    numvalfmt     => '%f',
+    floatvalfmt     => '%f',
 
     cc            => $Config{cc},
 
@@ -562,9 +562,9 @@ END
 }
 
 if ($c{nv} eq "double") {
-    $c{numvalfmt} = "%f";
+    $c{floatvalfmt} = "%f";
 } elsif ($c{nv} eq "long double") {
-    $c{numvalfmt} = "%lf";
+    $c{floatvalfmt} = "%lf";
 } else {
     die "Configure.pl:  Can't find a printf-style format specifier for type \"$c{nv}\"\n";
 }

diff --git a/classes/perlnum.pmc b/classes/perlnum.pmc
@@ -64,9 +64,9 @@ fprintf(stderr,"morph not implemented\n");
 	char* buff = mem_sys_allocate(80);
 	STRING* s;
 #ifdef HAS_SNPRINTF
-        snprintf(buff,80,NUMVAL_FMT,SELF->cache.num_val);
+        snprintf(buff,80,FLOATVAL_FMT,SELF->cache.num_val);
 #else
-        sprintf(buff,NUMVAL_FMT,SELF->cache.num_val);  /* XXX buffer overflow! */
+        sprintf(buff,FLOATVAL_FMT,SELF->cache.num_val);  /* XXX buffer overflow! */
 #endif
 	s = string_make(INTERP,buff,strlen(buff),NULL,0,NULL);
 	free(buff);

diff --git a/config_h.in b/config_h.in
@@ -50,7 +50,7 @@ typedef void SYNC;
 #define PARROT_CORE_OPLIB_INIT Parrot_DynOp_core_${MAJOR}_${MINOR}_${PATCH}
 
 #define INTVAL_FMT "${intvalfmt}"
-#define NUMVAL_FMT "${numvalfmt}"
+#define FLOATVAL_FMT "${floatvalfmt}"
 
 ${headers}
 

diff --git a/core.ops b/core.ops
@@ -258,7 +258,7 @@ inline op print(in INT) {
 }
 
 inline op print(in NUM) {
-  printf(NUMVAL_FMT, $1);
+  printf(FLOATVAL_FMT, $1);
   goto NEXT();
 }
 
@@ -316,7 +316,7 @@ op print(in INT, in NUM) {
                 break;
 	default: file = (FILE *)$1;
   }
-  fprintf(file, NUMVAL_FMT, $2);
+  fprintf(file, FLOATVAL_FMT, $2);
   goto NEXT();
 }
 

diff --git a/ops/core.ops b/ops/core.ops
@@ -258,7 +258,7 @@ inline op print(in INT) {
 }
 
 inline op print(in NUM) {
-  printf(NUMVAL_FMT, $1);
+  printf(FLOATVAL_FMT, $1);
   goto NEXT();
 }
 
@@ -316,7 +316,7 @@ op print(in INT, in NUM) {
                 break;
 	default: file = (FILE *)$1;
   }
-  fprintf(file, NUMVAL_FMT, $2);
+  fprintf(file, FLOATVAL_FMT, $2);
   goto NEXT();
 }