diff dstep/foundation/NSObjectScripting.d @ 16:19885b43130e

Huge update, the bridge actually works now
author Jacob Carlborg <doob@me.com>
date Sun, 03 Jan 2010 22:06:11 +0100
parents 89f3c3ef1fd2
children
line wrap: on
line diff
--- a/dstep/foundation/NSObjectScripting.d	Mon Aug 03 15:31:48 2009 +0200
+++ b/dstep/foundation/NSObjectScripting.d	Sun Jan 03 22:06:11 2010 +0100
@@ -8,16 +8,39 @@
 
 import dstep.foundation.NSDictionary;
 import dstep.foundation.NSObject;
-import dstep.foundation.NSScriptObjectSpecifier;
 import dstep.objc.bridge.Bridge;
-import dstep.objc.objc : id;
+import dstep.objc.objc;
+
+const TNSScripting = `
 
-template TNSScripting ()
-{
-	Object scriptingValueForSpecifier (NSScriptObjectSpecifier objectSpecifier);
-	NSDictionary scriptingProperties ();
-	void setScriptingProperties (NSDictionary properties);
-	Object copyScriptingValue (Object value, NSString key, NSDictionary properties);
-	Object newScriptingObjectOfClass (Class objectClass, NSString key, Object contentsValue, NSDictionary properties);
-}
-
+	Object scriptingValueForSpecifier (NSScriptObjectSpecifier objectSpecifier)
+	{
+		return invokeObjcSelf!(Object, "scriptingValueForSpecifier:", NSScriptObjectSpecifier)(objectSpecifier);
+	}
+	
+	NSDictionary scriptingProperties ()
+	{
+		return invokeObjcSelf!(NSDictionary, "scriptingProperties");
+	}
+	
+	void setScriptingProperties (NSDictionary properties)
+	{
+		return invokeObjcSelf!(void, "setScriptingProperties:", NSDictionary)(properties);
+	}
+	
+	Object copyScriptingValue (Object value, NSString key, NSDictionary properties)
+	{
+		return invokeObjcSelf!(Object, "copyScriptingValue:forKey:withProperties:", Object, NSString, NSDictionary)(value, key, properties);
+	}
+	
+	Object newScriptingObjectOfClass (Class objectClass, NSString key, Object contentsValue, NSDictionary properties)
+	{
+		return invokeObjcSelf!(Object, "newScriptingObjectOfClass:forValueForKey:withContentsValue:properties:", Class, NSString, Object, NSDictionary)(objectClass, key, contentsValue, properties);
+	}
+	
+	//mixin ObjcBindMethod!(scriptingValueForSpecifier, "scriptingValueForSpecifier:");
+	//mixin ObjcBindMethod!(scriptingProperties, "scriptingProperties");
+	//mixin ObjcBindMethod!(setScriptingProperties, "setScriptingProperties:");
+	//mixin ObjcBindMethod!(copyScriptingValue, "copyScriptingValue:forKey:withProperties:");
+	//mixin ObjcBindMethod!(newScriptingObjectOfClass, "newScriptingObjectOfClass:forValueForKey:withContentsValue:properties:");
+`;
\ No newline at end of file