Changeset 439 for branches/thune

Show
Ignore:
Timestamp:
07/25/07 22:34:49 (16 months ago)
Author:
krobillard
Message:

Fixes for Windows.

Location:
branches/thune/thread_safe
Files:
3 modified

Legend:

Unmodified
Added
Removed

  • branches/thune/thread_safe/files.c

    r432 r439  
    959959 
    960960        { 
    961         UCell* val = ur_makePort( dev, tos );  
     961        UCell* val = ur_makePort( ut, dev, tos );  
    962962        if( val ) 
    963963        { 

  • branches/thune/thread_safe/win32/os.c

    r432 r439  
    229229        cell = ur_appendCell(blk, UT_WORD); 
    230230        if( info.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ) 
    231             atom = UR_INTERN( "dir", 3 ); 
     231            atom = ur_intern( "dir", 3 ); 
    232232        else 
    233             atom = UR_INTERN( "file", 4 ); 
     233            atom = ur_intern( "file", 4 ); 
    234234        ur_setUnbound(cell, atom); 
    235235 

  • branches/thune/thread_safe/win32/os.h

    r431 r439  
    1111#include <stdlib.h> 
    1212#include <string.h> 
     13#include <windows.h> 
    1314 
    1415