date and time created 87/02/15 16:03:45 by lepreau

SCCS-vsn: local/sccscmds/sccscmds.2/util/zeropad.c 1.1
SCCS-vsn: local/sccscmds/sccscmds.ok/util/zeropad.c 1.1

diff --git a/usr/src/local/sccscmds/sccscmds.2/util/zeropad.c b/usr/src/local/sccscmds/sccscmds.2/util/zeropad.c
new file mode 100644 (file)
index 0000000..5f032f8
--- /dev/null
+++ b/usr/src/local/sccscmds/sccscmds.2/util/zeropad.c
@@ -0,0 +1,15 @@
+static char Sccsid[] "@(#)zeropad      2.2";
+/*
+       Replace initial blanks with '0's in `str'.
+       Return `str'.
+*/
+
+char *zeropad(str)
+char *str;
+{
+       register char *s;
+
+       for (s=str; *s == ' '; s++)
+               *s = '0';
+       return(str);
+}

diff --git a/usr/src/local/sccscmds/sccscmds.ok/util/zeropad.c b/usr/src/local/sccscmds/sccscmds.ok/util/zeropad.c
new file mode 100644 (file)
index 0000000..5f032f8
--- /dev/null
+++ b/usr/src/local/sccscmds/sccscmds.ok/util/zeropad.c
@@ -0,0 +1,15 @@
+static char Sccsid[] "@(#)zeropad      2.2";
+/*
+       Replace initial blanks with '0's in `str'.
+       Return `str'.
+*/
+
+char *zeropad(str)
+char *str;
+{
+       register char *s;
+
+       for (s=str; *s == ' '; s++)
+               *s = '0';
+       return(str);
+}