16 lines
406 B
Text
16 lines
406 B
Text
include "NSLog.incl"
|
|
|
|
void local fn ReadFileCharacterByCharacter( filePath as CFStringRef )
|
|
ptr path = fn StringUTF8String( filePath )
|
|
BeginCCode
|
|
FILE *inFile = fopen( path, "r");
|
|
int c;
|
|
while ( (c = fgetc( inFile )) != EOF )
|
|
NSLog( @"%c\b", c );
|
|
fclose( inFile );
|
|
EndC
|
|
end fn
|
|
|
|
fn ReadFileCharacterByCharacter( @"/Users/jim/Desktop/file.txt" )
|
|
|
|
HandleEvents
|