Changeset 450 for branches/thune/thread_safe/eval.c
- Timestamp:
- 08/11/07 04:53:46 (16 months ago)
- Files:
-
- 1 modified
-
branches/thune/thread_safe/eval.c (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
branches/thune/thread_safe/eval.c
r447 r450 90 90 static int ur_itLen( UThread* ut, UCell* cell ) 91 91 { 92 int len = ur_series Len( cell );92 int len = ur_seriesEnd( cell ); 93 93 if( len > -1 ) 94 94 len -= cell->series.it; … … 704 704 case UT_BINARY: 705 705 case UT_STRING: 706 case UT_SLICE:707 706 { 708 707 char *cpA1, *cpA2; … … 1213 1212 } 1214 1213 ur_type(val) = UT_BINARY; 1215 }1216 else if( ur_is(val, UT_SLICE) && (ur_sliceDT(val) == UT_STRING) )1217 {1218 if( ur_encCharSize(val) == 1 )1219 ur_sliceDT(val) = UT_BINARY;1220 1214 } 1221 1215 else if( ur_is(val, UT_BITSET) )
