X-Git-Url: http://git.ithinksw.org/ITFoundation.git/blobdiff_plain/8dad8db6544423018cfe3496b906af39bb3b3fbf..034559d9a2f0b8e607b0365152b9c73732f00e6e:/ITCarbonSupport.m

diff --git a/ITCarbonSupport.m b/ITCarbonSupport.m
old mode 100755
new mode 100644
index ed6a35c..31d25cd
--- a/ITCarbonSupport.m
+++ b/ITCarbonSupport.m
@@ -1,9 +1,16 @@
 #import "ITCarbonSupport.h"
 
-NSString *NSStringFromFourCharCode(FourCharCode code) {
-    return [NSString stringWithUTF8String:&code];
+NSString *NSStringFromFourCharCode(unsigned long code) {
+	return [NSString stringWithFormat:@"%.4s", &code];
 }
 
-FourCharCode FourCharCodeFromNSString(NSString *string) {
-    return (*((unsigned long*)[string UTF8String]));
+unsigned long FourCharCodeFromNSString(NSString *string) {
+	const unsigned char *c_s = [string UTF8String];
+	unsigned long tmp = *c_s++;
+	tmp <<= 8;
+	tmp |= *c_s++;
+	tmp <<= 8;
+	tmp |= *c_s++;
+	tmp <<= 8;
+	return tmp |= *c_s++;
 }
\ No newline at end of file