Changeset 453 for branches/thune/thread_safe/win32/os.c

Timestamp:

08/25/07 22:49:09 (15 months ago)

Author:

krobillard

Message:

UTF-8 strings can now be read.
ur_makeString() now takes UCell argument.

Files:

• branches/thune/thread_safe/win32/os.c (modified) (2 diffs)

branches/thune/thread_safe/win32/os.c

@@ -1 +1 @@
 /*============================================================================
     Thune Interpreter
-    Copyright (C) 2005-2006  Karl Robillard
+    Copyright (C) 2005-2007  Karl Robillard
 
     This library is free software; you can redistribute it and/or
@@ -326 +326 @@
                 continue;
 
-            cell = ur_appendCell( blk, UT_STRING /*UT_FILE*/ );
-            ur_setSeries( cell, ur_makeString(fileinfo.name, -1), 0 );
+            // Mark cell as unset in case GC is called by ur_makeString.
+            cell = ur_appendCell( blk, UT_UNSET );
+            ur_makeString( cell, fileinfo.name, -1 );
         }
         while( _findnext( handle, &fileinfo ) != -1 );