From 3a75cbad8fe41df7e2147cc7ab89ff7c65f3f004 Mon Sep 17 00:00:00 2001
From: neil <neil@51575b47-30f0-44d4-a5cc-537603b46e54>
Date: Sat, 15 May 2010 23:44:49 +0000
Subject: [PATCH] Bundle-aware Mac version of getself
git-svn-id: http://svn.net-core.org/repos/t-engine4@612 51575b47-30f0-44d4-a5cc-537603b46e54
---
src/mac/getself.m | 18 ++++++++++++++++++
1 file changed, 18 insertions(+)
create mode 100644 src/mac/getself.m
diff --git a/src/mac/getself.m b/src/mac/getself.m
new file mode 100644
index 0000000000..16ac964489
--- /dev/null
+++ b/src/mac/getself.m
@@ -0,0 +1,18 @@
+#import <Cocoa/Cocoa.h>
+
+const char *get_self_executable(int argc, char **argv)
+{
+ static char *cstr = 0;
+
+ if(!cstr)
+ {
+ NSString *resourcePath = [[NSBundle mainBundle] resourcePath];
+ resourcePath = [NSString stringWithFormat:@"%@/", resourcePath];
+ const char *utf8 = [resourcePath UTF8String];
+
+ cstr = malloc(strlen(utf8) + 1);
+ strcpy(cstr, utf8);
+ }
+
+ return cstr;
+}
--
GitLab