The patch fix bug described in TODO:

bmomjian · bmomjian · commit c27d95e25da8 · 2002-09-20T03:57:09.000Z
* to_char(0,'FM999.99') returns a period, to_char(1,'FM999.99') does not

Karel Zak
diff --git a/src/backend/utils/adt/formatting.c b/src/backend/utils/adt/formatting.c
@@ -1,7 +1,7 @@
 /* -----------------------------------------------------------------------
  * formatting.c
  *
- * $Header: /cvsroot/pgsql/src/backend/utils/adt/formatting.c,v 1.55 2002/09/20 03:54:57 momjian Exp $
+ * $Header: /cvsroot/pgsql/src/backend/utils/adt/formatting.c,v 1.56 2002/09/20 03:57:09 momjian Exp $
  *
  *
  *	 Portions Copyright (c) 1999-2002, PostgreSQL Global Development Group
@@ -3767,11 +3767,11 @@ NUM_numpart_to_char(NUMProc *Np, int id)
 					strcpy(Np->inout_p, Np->decimal);	/* Write DEC/D */
 					Np->inout_p += strlen(Np->inout_p);
 
-					/*
-					 * terrible Ora '0' -- 9.9 --> '0.'
-					 */
 				}
-				else if (IS_FILLMODE(Np->Num) && *Np->number == '0' &&
+				/*
+				 * Ora 'n' -- FM9.9 --> 'n.'
+				 */
+				else if (IS_FILLMODE(Np->Num)  &&
 						 Np->last_relevant && *Np->last_relevant == '.')
 				{
 
@@ -3798,11 +3798,10 @@ NUM_numpart_to_char(NUMProc *Np, int id)
 					{
 						*Np->inout_p = ' ';
 						++Np->inout_p;
-
-						/*
-						 * total terrible Ora: '0' -- FM9.9 --> '0.'
-						 */
 					}
+					/*
+					 * total terrible Ora: '0' -- FM9.9 --> '0.'
+					 */
 					else if (Np->last_relevant && *Np->last_relevant == '.')
 					{
 						*Np->inout_p = '0';

Original file line number	Diff line number	Diff line change
`@@ -1,7 +1,7 @@`
`1`	`1`	`/* -----------------------------------------------------------------------`
`2`	`2`	`* formatting.c`
`3`	`3`	`*`
`4`		`- * $Header: /cvsroot/pgsql/src/backend/utils/adt/formatting.c,v 1.55 2002/09/20 03:54:57 momjian Exp $`
	`4`	`+ * $Header: /cvsroot/pgsql/src/backend/utils/adt/formatting.c,v 1.56 2002/09/20 03:57:09 momjian Exp $`
`5`	`5`	`*`
`6`	`6`	`*`
`7`	`7`	`* Portions Copyright (c) 1999-2002, PostgreSQL Global Development Group`
`@@ -3767,11 +3767,11 @@ NUM_numpart_to_char(NUMProc *Np, int id)`
`3767`	`3767`	`strcpy(Np->inout_p, Np->decimal); /* Write DEC/D */`
`3768`	`3768`	`Np->inout_p += strlen(Np->inout_p);`
`3769`	`3769`
`3770`		`- /*`
`3771`		`- * terrible Ora '0' -- 9.9 --> '0.'`
`3772`		`- */`
`3773`	`3770`	`}`
`3774`		`- else if (IS_FILLMODE(Np->Num) && *Np->number == '0' &&`
	`3771`	`+ /*`
	`3772`	`+ * Ora 'n' -- FM9.9 --> 'n.'`
	`3773`	`+ */`
	`3774`	`+ else if (IS_FILLMODE(Np->Num) &&`
`3775`	`3775`	`Np->last_relevant && *Np->last_relevant == '.')`
`3776`	`3776`	`{`
`3777`	`3777`
`@@ -3798,11 +3798,10 @@ NUM_numpart_to_char(NUMProc *Np, int id)`
`3798`	`3798`	`{`
`3799`	`3799`	`*Np->inout_p = ' ';`
`3800`	`3800`	`++Np->inout_p;`
`3801`		`-`
`3802`		`- /*`
`3803`		`- * total terrible Ora: '0' -- FM9.9 --> '0.'`
`3804`		`- */`
`3805`	`3801`	`}`
	`3802`	`+ /*`
	`3803`	`+ * total terrible Ora: '0' -- FM9.9 --> '0.'`
	`3804`	`+ */`
`3806`	`3805`	`else if (Np->last_relevant && *Np->last_relevant == '.')`
`3807`	`3806`	`{`
`3808`	`3807`	`*Np->inout_p = '0';`