Fixed segfaults when redirecting output < > -- Espice

ChangeLog

@@ -1,3 +1,8 @@
+2008-11-04 Paolo Nenzi
+ * src/frontend/parser/lexical.c: 
+   53: Fixed the problem of segmentation fault when redirecting output putting spaces
+       around "<" or ">". A. Roldan - Espice
+
 2008-11-02 Lionel Sainte Cluque
  * src/tclspice.c : tcl_vfprintf corrects the stou bug
  * README.tcl : Creation

src/frontend/parser/lexical.c

@@ -298,7 +298,8 @@ gotchar:
 	    } goto ldefault; /* else continue with default ... */
 	case '<':
 	case '>':  /* va: <=, >= are unbreakable words */
-	    if (i==0 && *string=='=') {
+       if(string)
+	    if (i==0 && (*string=='=')) {
 	        buf[i++]=c;
 	        break;
 	    } goto ldefault; /* else continue with default ... */