do not put a leading blank before real numbers

SCCS-vsn: usr.bin/pascal/src/pcproc.c 1.12
SCCS-vsn: usr.bin/pascal/src/proc.c 1.14

diff --git a/usr/src/usr.bin/pascal/src/pcproc.c b/usr/src/usr.bin/pascal/src/pcproc.c
index 3c8c234..2a7f2a6 100644 (file)
--- a/usr/src/usr.bin/pascal/src/pcproc.c
+++ b/usr/src/usr.bin/pascal/src/pcproc.c
@@ -1,6 +1,6 @@
 /* Copyright (c) 1979 Regents of the University of California */
 
 /* Copyright (c) 1979 Regents of the University of California */
 

-static char sccsid[] = "@(#)pcproc.c 1.11 %G%";
+static char sccsid[] = "@(#)pcproc.c 1.12 %G%";

 
 #include "whoami.h"
 #ifdef PC
 
 #include "whoami.h"
 #ifdef PC


@@ -492,7 +492,7 @@ pcproc(r)
                                                field = 1;
                                }
                                format[0] = ' ';
                                                field = 1;
                                }
                                format[0] = ' ';

-                               fmtstart = 0;
+                               fmtstart = 1;

                                break;
                        case TSTR:
                                constval( alv );
                                break;
                        case TSTR:
                                constval( alv );

diff --git a/usr/src/usr.bin/pascal/src/proc.c b/usr/src/usr.bin/pascal/src/proc.c
index 506cbcc..c0df8f7 100644 (file)
--- a/usr/src/usr.bin/pascal/src/proc.c
+++ b/usr/src/usr.bin/pascal/src/proc.c
@@ -1,6 +1,6 @@
 /* Copyright (c) 1979 Regents of the University of California */
 
 /* Copyright (c) 1979 Regents of the University of California */
 

-static char sccsid[] = "@(#)proc.c 1.13 %G%";
+static char sccsid[] = "@(#)proc.c 1.14 %G%";

 
 #include "whoami.h"
 #ifdef OBJ
 
 #include "whoami.h"
 #ifdef OBJ


@@ -439,7 +439,7 @@ proc(r)
                                                field = 1;
                                }
                                format[0] = ' ';
                                                field = 1;
                                }
                                format[0] = ' ';

-                               fmtstart = 0;
+                               fmtstart = 1;

                                break;
                        case TSTR:
                                constval( alv );
                                break;
                        case TSTR:
                                constval( alv );