[freesci-develop] r1587 - freesci/branches/glutton/src/engine

[freesci]

Author: skovmanden
Date: 2006-11-25 15:36:46 +0100 (Sat, 25 Nov 2006)
New Revision: 1587

Modified:
   freesci/branches/glutton/src/engine/kstring.c
Log:
I removed one very important line of code at the last
minute. Re-added. 

Lars



Modified: freesci/branches/glutton/src/engine/kstring.c
===================================================================
--- freesci/branches/glutton/src/engine/kstring.c       2006-11-25 14:30:24 UTC 
(rev 1586)
+++ freesci/branches/glutton/src/engine/kstring.c       2006-11-25 14:36:46 UTC 
(rev 1587)
@@ -458,7 +458,8 @@
                return NULL_REG;
        }
 
-       if (!is_print_str(dest)) /* SQ4 array handling detected */
+       if ((strlen(dest) < 2) ||
+           (!is_print_str(dest))) /* SQ4 array handling detected */
        {
 #ifndef WORDS_BIGENDIAN
                int odd = KP_UINT(argv[1]) & 1;