Minor correction to recent post.

2002-03-14 00:12:43 +00:00
parent 564a6d0295
commit 6d9c3f496a
1 changed files with 1 additions and 1 deletions
--- a/harbour/source/compiler/harbour.slx
+++ b/harbour/source/compiler/harbour.slx
@@ -485,7 +485,7 @@ LANGUAGE_RULES_ARE {

 #undef STREAM_APPEND
   #define STREAM_APPEND(x) \
-      if( iPairLen == 0 && sStart[1] == '[' ) { sPair[ iPairLen++ ] = sStart[1]; } \
+      if( iPairLen == 0 && sStart[0] == '[' && sStart[1] ) { sPair[ iPairLen++ ] = sStart[1]; } \
      if( x == ']' && iCloseSquare == 0 ) { iCloseSquare = iPairLen + 1; } sPair[ iPairLen++ ] = x;

 #undef STREAM_OPEN