* which can be later read back into SMS in the event of a crash.
*
* $Log$
- * Revision 1.2 1987-07-13 03:52:53 wesommer
- * Modified to pass lint, do better backups.
+ * Revision 1.3 1988-08-16 16:25:30 mar
+ * con't put extra whitespace in backup files
*
+ * Revision 1.2 87/07/13 03:52:53 wesommer
+ * Modified to pass lint, do better backups.
+ *
Revision 1.1 87/07/11 19:51:05 wesommer
Initial revision
register FILE *f;
register char *str;
{
- register char *ibp = str;
+ char *strtrim();
+ register char *ibp = strtrim(str);
register int c; /* PCC doesn't put chars in registers.. */
for (; c = *ibp; ibp++) {
c = toascii(c); /* punt 8th bit */
return(f);
}
+
+/*
+ * Trim whitespace off both ends of a string.
+ */
+char *strtrim(save)
+ register char *save;
+{
+ register char *t, *s;
+
+ s = save;
+ while (isspace(*s)) s++;
+ /* skip to end of string */
+ if (*s == '\0') {
+ *save = '\0';
+ return(save);
+ }
+
+ for (t = s; *t; t++) continue;
+ while (t > s) {
+ --t;
+ if (!isspace(*t)) {
+ t++;
+ break;
+ }
+ }
+ *t = '\0';
+ return s;
+}
+
+
+
/*
* Local Variables:
* mode: c