Index: /trunk/Ohana/src/imregister/base/ConfigFilter.c
===================================================================
--- /trunk/Ohana/src/imregister/base/ConfigFilter.c	(revision 10072)
+++ /trunk/Ohana/src/imregister/base/ConfigFilter.c	(revision 10073)
@@ -72,5 +72,5 @@
   for (i = 0; i < strlen (line); i++, p++) {
     *p = line[i];
-    if (whitespace(line[i])) { 
+    if (OHANA_WHITESPACE(line[i])) { 
       *p = '.';
       if (blank) p--;
Index: /trunk/Ohana/src/imregister/base/misc.c
===================================================================
--- /trunk/Ohana/src/imregister/base/misc.c	(revision 10072)
+++ /trunk/Ohana/src/imregister/base/misc.c	(revision 10073)
@@ -109,5 +109,5 @@
   
    
-/* replaces whitespace blocks with single . */
+/* replaces WHITESPACE blocks with single . */
 void clean_spaces (char *line) {
 
@@ -118,9 +118,9 @@
   out = in = line;
   while (*in) {
-    if (whitespace(*in)) { 
+    if (OHANA_WHITESPACE(*in)) { 
       *out = '.';
       out ++;
       in ++;
-      while (*in && whitespace(*in)) in++;
+      while (*in && OHANA_WHITESPACE(*in)) in++;
     } else {
       *out = *in;
Index: /trunk/Ohana/src/libfits/header/F_modify.c
===================================================================
--- /trunk/Ohana/src/libfits/header/F_modify.c	(revision 10072)
+++ /trunk/Ohana/src/libfits/header/F_modify.c	(revision 10073)
@@ -117,5 +117,5 @@
   
   c += 2;
-  /* advance pointer over whitespace */
+  /* advance pointer over WHITESPACE */
   while ((*c == ' ') && (c < line + 80)) { c++; }
   
@@ -137,5 +137,5 @@
   c1 += 2;
 
-  /* advance pointer over whitespace */
+  /* advance pointer over WHITESPACE */
   while ((*c1 == ' ') && (c1 < line + 80)) { c1++; }
   
Index: /trunk/Ohana/src/libfits/header/F_scan.c
===================================================================
--- /trunk/Ohana/src/libfits/header/F_scan.c	(revision 10072)
+++ /trunk/Ohana/src/libfits/header/F_scan.c	(revision 10073)
@@ -42,5 +42,5 @@
     Nchar = MIN (80, p + 80 - q);
     memcpy (tmp, q, Nchar);
-    gfits_stripwhite (tmp);
+    stripwhite (tmp);
     strcpy (va_arg (argp, char *), tmp);
     return (TRUE);
@@ -55,5 +55,5 @@
     bzero (tmp, 81);
     memcpy (tmp, s, Nchar);
-    gfits_stripwhite (tmp);
+    stripwhite (tmp);
     strcpy (va_arg (argp, char *), tmp);
     return (TRUE);
@@ -94,41 +94,2 @@
 /* if the variable argument stuff breaks on another system, look 
 at F_modify.c as it has the old code */
-
-#ifndef whitespace
-#define whitespace(c) (((c) == ' ') || ((c) == '\t'))
-#endif
-
-/* Strip whitespace from the start and end of STRING. */
-int gfits_stripwhite (char *string) {
-
-  int i;
-
-  if (string == (char *) NULL)
-    return (FALSE);
-
-  for (i = 0; whitespace (string[i]); i++);
-  if (i) memmove (string, string + i, strlen(string+i)+1);
-  for (i = strlen (string) - 1; (i > 0) && whitespace (string[i]); i--);
-  string[++i] = 0;
-
-  return (i);
-
-}
-
-# if (0)
-    one_quote = FALSE;
-    tmp[0] = *(p + 10);
-    if (tmp[0] == 0x27)
-      one_quote = TRUE;
-    /* end the string if we hit: a -- end of line (80 chars) b -- NEWLINE c -- '(0x27: single quote) (end of string) */
-    for (i = 1; (i < 70) && (p[i + 10] != NEWLINE) && ((p[i + 10] != 0x27) || !one_quote); i++) {
-      tmp[i] = *(p + 10 + i);
-      if ((tmp[i] == 0x27) && !one_quote)
-	one_quote = TRUE;
-      if ((tmp[i] == 0x2f) && !one_quote)
-	break;
-    }
-    tmp[i] = 0;
-    if ((c = strchr (tmp, 0x27)) != NULL)
-      *c = ' ';
-# endif
Index: /trunk/Ohana/src/libkapa/src/DrawRotString.c
===================================================================
--- /trunk/Ohana/src/libkapa/src/DrawRotString.c	(revision 10072)
+++ /trunk/Ohana/src/libkapa/src/DrawRotString.c	(revision 10073)
@@ -26,5 +26,5 @@
 
   unsigned char *bitmap;
-  char *currentname, basename[64], *c; 
+  char *currentname, basename[64]; 
   int i, dy, dx, N, X, Y, code;
   int dX, Xoff, dY, Yoff, YoffBase;
@@ -38,12 +38,12 @@
   basesize = currentsize;
 
-  /* strip leading whitespace */
-  for (c = string; (*c == ' ') || (*c == '\t'); c++);
-  if (*c == 0) return (FALSE);
+  /* strip leading WHITESPACE */
+  stripwhite (string);
+  if (*string == 0) return (FALSE);
   
   /* compute string length */
   cs = cos(angle*RAD_DEG);
   sn = sin(angle*RAD_DEG);
-  dX = RotStrlen (c);
+  dX = RotStrlen (string);
   dY = currentfont[65].ascent;
 
@@ -66,6 +66,6 @@
   YoffBase = Yoff;
   /* draw characters one-by-one */
-  for (i = 0; i < strlen(c); i++) {
-    N = (int)(c[i]);
+  for (i = 0; i < strlen(string); i++) {
+    N = (int)(string[i]);
     if ((N < 0) || (N >= NROTCHARS)) continue;
 
@@ -95,17 +95,17 @@
       } 
       if (N == 38) {
-	if (c[i+1] == 'h') {
+	if (string[i+1] == 'h') {
 	  SetRotFont ("helvetica", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
 	}
-	if (c[i+1] == 't') {
+	if (string[i+1] == 't') {
 	  SetRotFont ("times", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
 	}
-	if (c[i+1] == 'c') {
+	if (string[i+1] == 'c') {
 	  SetRotFont ("courier", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
 	}
-	if (c[i+1] == 's') {
+	if (string[i+1] == 's') {
 	  SetRotFont ("symbol", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
Index: /trunk/Ohana/src/libkapa/src/PSRotFont.c
===================================================================
--- /trunk/Ohana/src/libkapa/src/PSRotFont.c	(revision 10072)
+++ /trunk/Ohana/src/libkapa/src/PSRotFont.c	(revision 10073)
@@ -6,5 +6,5 @@
 void PSRotText (FILE *f, int x, int y, char *string, int pos, double angle) {
 
-  char *c, *segment, basename[64], *currentname;
+  char *segment, basename[64], *currentname;
   int i, N, code;
   int dX, dY, Xoff, Yoff, X, Y, Nseg, NSEG, YoffBase;
@@ -18,7 +18,7 @@
   basesize = currentsize;
 
-  /* strip off leading whitespace */
-  for (c = string; (*c == ' ') || (*c == '\t'); c++);
-  if (*c == 0) return;
+  /* strip off leading WHITESPACE */
+  stripwhite (string);
+  if (*string == 0) return;
   
   /* compute string length */
@@ -29,5 +29,5 @@
   if (!strcmp (currentname, "helvetica")) fscale = 0.9;
   if (!strcmp (currentname, "symbol")) fscale = 1.2;
-  dX = fscale*RotStrlen (c);
+  dX = fscale*RotStrlen (string);
   dY = currentfont[65].ascent;
   
@@ -55,5 +55,5 @@
 
   Nseg = 0;
-  NSEG = strlen(c) + 2;
+  NSEG = strlen(string) + 2;
   ALLOCATE (segment, char, NSEG);
   bzero (segment, NSEG);
@@ -62,6 +62,6 @@
   YoffBase = 0;
   /* accumulate string segments with common state */
-  for (i = 0; i < strlen (c); i++) {
-    N = (int)(c[i]);
+  for (i = 0; i < strlen (string); i++) {
+    N = (int)(string[i]);
     if ((N < 0) || (N >= NROTCHARS)) continue;
 
@@ -122,20 +122,20 @@
       if (N == 38) {
 	PSDumpRotSegment (f, segment, &Nseg);
-	if (c[i+1] == 'h') {
+	if (string[i+1] == 'h') {
 	  SetRotFont ("helvetica", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
 	  PSSetFont (f, currentname, currentsize);
 	}
-	if (c[i+1] == 't') {
+	if (string[i+1] == 't') {
 	  SetRotFont ("times", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
 	  PSSetFont (f, currentname, currentsize);
 	}
-	if (c[i+1] == 'c') {
+	if (string[i+1] == 'c') {
 	  SetRotFont ("courier", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
 	  PSSetFont (f, currentname, currentsize);
 	}
-	if (c[i+1] == 's') {
+	if (string[i+1] == 's') {
 	  SetRotFont ("symbol", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
Index: /trunk/Ohana/src/libkapa/src/bDrawRotFont.c
===================================================================
--- /trunk/Ohana/src/libkapa/src/bDrawRotFont.c	(revision 10072)
+++ /trunk/Ohana/src/libkapa/src/bDrawRotFont.c	(revision 10073)
@@ -27,12 +27,12 @@
   basesize = currentsize;
 
-  /* strip leading whitespace */
-  for (c = string; (*c == ' ') || (*c == '\t'); c++);
-  if (*c == 0) return (FALSE);
+  /* strip leading WHITESPACE */
+  stripwhite (string);
+  if (*string == 0) return (FALSE);
   
   /* compute string length */
   cs = cos(angle*RAD_DEG);
   sn = sin(angle*RAD_DEG);
-  dX = RotStrlen (c);
+  dX = RotStrlen (string);
   dY = currentfont[65].ascent;
 
@@ -55,6 +55,6 @@
   YoffBase = Yoff;
   /* draw characters one-by-one */
-  for (i = 0; i < strlen(c); i++) {
-    N = (int)(c[i]);
+  for (i = 0; i < strlen(string); i++) {
+    N = (int)(string[i]);
     if ((N < 0) || (N >= NROTCHARS)) continue;
 
@@ -84,17 +84,17 @@
       } 
       if (N == 38) {
-	if (c[i+1] == 'h') {
+	if (string[i+1] == 'h') {
 	  SetRotFont ("helvetica", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
 	}
-	if (c[i+1] == 't') {
+	if (string[i+1] == 't') {
 	  SetRotFont ("times", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
 	}
-	if (c[i+1] == 'c') {
+	if (string[i+1] == 'c') {
 	  SetRotFont ("courier", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
 	}
-	if (c[i+1] == 's') {
+	if (string[i+1] == 's') {
 	  SetRotFont ("symbol", currentsize);
 	  currentfont = GetRotFontData (&currentscale);
Index: /trunk/Ohana/src/libohana/include/ohana.h
===================================================================
--- /trunk/Ohana/src/libohana/include/ohana.h	(revision 10072)
+++ /trunk/Ohana/src/libohana/include/ohana.h	(revision 10073)
@@ -93,4 +93,13 @@
 # endif /* FOPEN */
 
+/*
+  isspace is c99 : do we require c99 now? 
+  isspace()
+   checks  for white-space characters.  In the "C" and "POSIX" locales, these are: space, form-feed ('\f'), newline ('\n'),
+   carriage return ('\r'), horizontal tab ('\t'), and vertical tab ('\v').
+   horiz. tab: 0x09, vert. tab: 0x0b, newline: 0x0a, form-feed: 0x0c, return: 0x0d, space: 0x20, 
+*/
+# define OHANA_WHITESPACE(c)(((c) == 0x09) || ((c) == 0x0a) || ((c) == 0x0b) || ((c) == 0x0b) || ((c) == 0x0c) || ((c) == 0x0d) || ((c) == 0x20))
+
 /* socket / pipe communication buffer */
 typedef struct {
Index: /trunk/Ohana/src/libohana/src/config.c
===================================================================
--- /trunk/Ohana/src/libohana/src/config.c	(revision 10072)
+++ /trunk/Ohana/src/libohana/src/config.c	(revision 10073)
@@ -1,6 +1,3 @@
 # include <ohana.h>
-# ifndef whitespace
-# define whitespace(c) (((c) == ' ') || ((c) == '\t'))
-# endif
 
 # define D_NBYTES 4096
@@ -278,5 +275,5 @@
     }
     p2 = tmp + strlen (tfield);
-    if (whitespace (*p2)) {
+    if (OHANA_WHITESPACE (*p2)) {
       p = p2;
       i++;
Index: /trunk/Ohana/src/libohana/src/string.c
===================================================================
--- /trunk/Ohana/src/libohana/src/string.c	(revision 10072)
+++ /trunk/Ohana/src/libohana/src/string.c	(revision 10073)
@@ -1,9 +1,5 @@
 # include <ohana.h>
 
-#ifndef whitespace
-#define whitespace(c) (((c) == ' ') || ((c) == '\t'))
-#endif
-
-/* Strip whitespace from the start and end of STRING. */
+/* Strip WHITESPACE from the start and end of STRING. */
 int stripwhite (char *string) {
 
@@ -12,7 +8,7 @@
   if (string == (char *) NULL) return (FALSE);
 
-  for (i = 0; whitespace (string[i]); i++);
+  for (i = 0; OHANA_WHITESPACE (string[i]); i++);
   if (i) memmove (string, string + i, strlen(string+i)+1);
-  for (i = strlen (string) - 1; (i > 0) && whitespace (string[i]); i--);
+  for (i = strlen (string) - 1; (i > 0) && OHANA_WHITESPACE (string[i]); i--);
   string[++i] = 0;
   return (i);
Index: /trunk/Ohana/src/misc/src/string.c
===================================================================
--- /trunk/Ohana/src/misc/src/string.c	(revision 10072)
+++ /trunk/Ohana/src/misc/src/string.c	(revision 10073)
@@ -1,5 +1,5 @@
 # include <ohana.h>
 
-/* Strip whitespace from the start and end of STRING. */
+/* Strip WHITESPACE from the start and end of STRING. */
 int stripwhite (string)
 char *string;
@@ -10,7 +10,7 @@
     return (FALSE);
 
-  for (i = 0; whitespace (string[i]); i++);
+  for (i = 0; OHANA_WHITESPACE (string[i]); i++);
   if (i) memmove (string, string + i, strlen(string+i)+1);
-  for (i = strlen (string) - 1; (i > 0) && whitespace (string[i]); i--);
+  for (i = strlen (string) - 1; (i > 0) && OHANA_WHITESPACE (string[i]); i--);
   string[++i] = 0;
   return (i);
Index: /trunk/Ohana/src/misc/src/test.c
===================================================================
--- /trunk/Ohana/src/misc/src/test.c	(revision 10072)
+++ /trunk/Ohana/src/misc/src/test.c	(revision 10073)
@@ -23,5 +23,5 @@
 # define ISNUM(c) (isdigit(c) || (c == '-') || (c == '.'))
 
-/* Strip whitespace from the start and end of STRING. */
+/* Strip WHITESPACE from the start and end of STRING. */
 int stripwhite (string)
 char *string;
@@ -32,5 +32,5 @@
     return (0);
 
-  for (i = 0; whitespace (string[i]); i++);
+  for (i = 0; OHANA_WHITESPACE (string[i]); i++);
 
   if (i)
@@ -39,5 +39,5 @@
   i = strlen (string) - 1;
 
-  for (; (i > 0) && whitespace (string[i]); i--);
+  for (; (i > 0) && OHANA_WHITESPACE (string[i]); i--);
 
   string[++i] = 0;
Index: /trunk/Ohana/src/opihi/cmd.data/init.c
===================================================================
--- /trunk/Ohana/src/opihi/cmd.data/init.c	(revision 10072)
+++ /trunk/Ohana/src/opihi/cmd.data/init.c	(revision 10073)
@@ -100,4 +100,5 @@
 int vgrid            PROTO((int, char **));
 int vgauss           PROTO((int, char **));
+int vmaxwell         PROTO((int, char **));
 int vload            PROTO((int, char **));
 int vstat            PROTO((int, char **));
@@ -211,4 +212,5 @@
   {"select",	   vect_select,	     "selective vector assignment"},
   {"vgauss",       vgauss,	     ""},
+  {"vmaxwell",     vmaxwell,	     ""},
   {"vgrid",        vgrid,	     ""},
   {"vload",        vload,	     "load vectors on Kii"},
Index: /trunk/Ohana/src/opihi/lib.shell/expand_vars.c
===================================================================
--- /trunk/Ohana/src/opihi/lib.shell/expand_vars.c	(revision 10072)
+++ /trunk/Ohana/src/opihi/lib.shell/expand_vars.c	(revision 10073)
@@ -38,5 +38,5 @@
     if (*L == 0) break;
 
-    V1 = aftervar (L);           /* V1 points to the first non-whitespace after the variable */
+    V1 = aftervar (L);           /* V1 points to the first non-WHITESPACE after the variable */
     V0 = thisvar (L);            /* V0 points to the name of the var */
     /* note: V1 points to a fraction of L, it does not need to be freed */
Index: /trunk/Ohana/src/opihi/lib.shell/expand_vectors.c
===================================================================
--- /trunk/Ohana/src/opihi/lib.shell/expand_vectors.c	(revision 10072)
+++ /trunk/Ohana/src/opihi/lib.shell/expand_vectors.c	(revision 10073)
@@ -50,5 +50,5 @@
 
     /* find vector name */
-    for (w = p - 1; (w >= line) && !whitespace(*w) && (isalnum(*w) || (*w == ':') || (*w == '_')); w--);
+    for (w = p - 1; (w >= line) && !OHANA_WHITESPACE(*w) && (isalnum(*w) || (*w == ':') || (*w == '_')); w--);
     w ++;
     n = (int)(p - w);
Index: /trunk/Ohana/src/opihi/lib.shell/isolate_elements.c
===================================================================
--- /trunk/Ohana/src/opihi/lib.shell/isolate_elements.c	(revision 10072)
+++ /trunk/Ohana/src/opihi/lib.shell/isolate_elements.c	(revision 10073)
@@ -121,5 +121,5 @@
       }
       /* not an operator, not a quoted string */
-      if (!whitespace (in[i][j])) {
+      if (!OHANA_WHITESPACE (in[i][j])) {
 	InsertValue (in[i][j]);
       } else {
Index: /trunk/Ohana/src/opihi/lib.shell/opihi.c
===================================================================
--- /trunk/Ohana/src/opihi/lib.shell/opihi.c	(revision 10072)
+++ /trunk/Ohana/src/opihi/lib.shell/opihi.c	(revision 10073)
@@ -33,4 +33,5 @@
       continue;
     }
+
     Nbad = 0;
     ohana_memregister (line);
Index: /trunk/Ohana/src/opihi/lib.shell/parse.c
===================================================================
--- /trunk/Ohana/src/opihi/lib.shell/parse.c	(revision 10072)
+++ /trunk/Ohana/src/opihi/lib.shell/parse.c	(revision 10073)
@@ -51,5 +51,5 @@
     if (*V1 != '=') goto error;
 
-    /* find first non-whitespace character after = */
+    /* find first non-WHITESPACE character after = */
     V1 ++;
     while (isspace (*V1)) V1++;
@@ -93,5 +93,5 @@
       val = dvomath (1, &V1, &size, 0);
       if (val == NULL) { 
-	while (whitespace (*V1)) V1++;
+	while (OHANA_WHITESPACE (*V1)) V1++;
 	val = strcreate (V1);
       } 
Index: /trunk/Ohana/src/opihi/lib.shell/string.c
===================================================================
--- /trunk/Ohana/src/opihi/lib.shell/string.c	(revision 10072)
+++ /trunk/Ohana/src/opihi/lib.shell/string.c	(revision 10073)
@@ -3,7 +3,7 @@
 /**********************************************************************/
 /* returns a pointer to an isolated string containing the first word,
-   removing leading whitespace.  A "word" is a contiguous set of 
+   removing leading WHITESPACE.  A "word" is a contiguous set of 
    characters from the set: alphanumerics, and any of: / . _ -
-   Any other single, non-whitespace characters are considered to be 
+   Any other single, non-WHITESPACE characters are considered to be 
    complete words in themselves.  Any characters surrounded by quotes 
    make a single word 
@@ -17,5 +17,5 @@
   if (string == (char *) NULL) return ((char *) NULL);
 
-  for (i = 0; whitespace (string[i]); i++);
+  for (i = 0; OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *)NULL);
   if (string[i] == ';') {
@@ -63,5 +63,5 @@
 
 
-  for (j = i; (string[j] != 0) && (string[j] != ';') && !whitespace(string[j]); j++);
+  for (j = i; (string[j] != 0) && (string[j] != ';') && !OHANA_WHITESPACE(string[j]); j++);
   word = strncreate (&string[i], j - i);
   return (word);
@@ -70,5 +70,5 @@
 
 /* returns a pointer to an isolated string containing the first command,
-   removing leading whitespace.  A command ends with the first non whitespace */
+   removing leading WHITESPACE.  A command ends with the first non WHITESPACE */
 char *thiscomm (char *string) {
 
@@ -78,8 +78,8 @@
   if (string == (char *) NULL) return ((char *) NULL);
 
-  for (i = 0; whitespace (string[i]); i++);
+  for (i = 0; OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *)NULL);
 
-  for (j = i; ((string[j] != 0) && !whitespace (string[j])); j++);
+  for (j = i; ((string[j] != 0) && !OHANA_WHITESPACE (string[j])); j++);
   if (i == j) return ((char *) NULL);
 
@@ -122,5 +122,5 @@
   if (string == (char *) NULL) return ((char *) NULL);
 
-  for (i = 0; whitespace (string[i]); i++);
+  for (i = 0; OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *)NULL);
 
@@ -134,5 +134,5 @@
     }
     i++;
-    for (; (string[i] != 0) && whitespace (string[i]); i++);
+    for (; (string[i] != 0) && OHANA_WHITESPACE (string[i]); i++);
     if (string[i] == 0) return ((char *) NULL);
     return (&string[i]);
@@ -155,5 +155,5 @@
       return ((char *)NULL);
     }
-    for (; (string[i] != 0) && whitespace (string[i]); i++);
+    for (; (string[i] != 0) && OHANA_WHITESPACE (string[i]); i++);
     if (string[i] == 0) return ((char *) NULL);
     return (&string[i]);
@@ -161,6 +161,6 @@
 
   if (string[i] == ';') i++;
-  for (; (string[i] != 0) && (string[i] != ';') && !whitespace(string[i]); i++);
-  for (; (string[i] != 0) && whitespace (string[i]); i++);
+  for (; (string[i] != 0) && (string[i] != ';') && !OHANA_WHITESPACE(string[i]); i++);
+  for (; (string[i] != 0) && OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *) NULL);
 
@@ -169,5 +169,5 @@
 
 /* returns a pointer to the next command, or (char *) NULL 
-   if there is not a next command.  A command is bounded by whitespace */
+   if there is not a next command.  A command is bounded by WHITESPACE */
 char *nextcomm (char *string) {
 
@@ -176,8 +176,8 @@
   if (string == (char *) NULL) return ((char *) NULL);
   
-  for (i = 0; (string[i] != 0) && !whitespace (string[i]); i++);
+  for (i = 0; (string[i] != 0) && !OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *) NULL);
   
-  for (; whitespace (string[i]); i++);
+  for (; OHANA_WHITESPACE (string[i]); i++);
   if (string[i] == 0) return ((char *) NULL);
 
@@ -193,11 +193,11 @@
   if (c == (char *) NULL) return ((char *) NULL);
 
-  for (; !whitespace(*c) && (c >= string); c--);
+  for (; !OHANA_WHITESPACE(*c) && (c >= string); c--);
   if (c < string) return ((char *)NULL);
 
-  for (; whitespace(*c) && (c >= string); c--);
+  for (; OHANA_WHITESPACE(*c) && (c >= string); c--);
   if (c < string)
     return ((char *)NULL);
-  for (; !whitespace(*c) && (c >= string); c--);
+  for (; !OHANA_WHITESPACE(*c) && (c >= string); c--);
   c++;
   return (c);
@@ -207,5 +207,5 @@
 
 /* take a pointer to the beginning of a variable (ie $fred) and return
-   a pointer to the next thing (non whitespace) which is not part of the
+   a pointer to the next thing (non WHITESPACE) which is not part of the
    variable extract only the variable name */
 
@@ -224,5 +224,5 @@
   if (i == start) return ((char *) NULL);
 
-  for (j = i; whitespace (string[j]); j++);
+  for (j = i; OHANA_WHITESPACE (string[j]); j++);
   if (string[j] == 0) return ((char *)NULL);
 
@@ -240,5 +240,5 @@
   if (c == (char *) NULL) return ((char *) NULL);
 
-  for (; (c >= string) && whitespace(*c); c--);
+  for (; (c >= string) && OHANA_WHITESPACE(*c); c--);
   if (c < string) return ((char *)NULL);