--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/dwt/internal/objc/runtime.d	Sat Aug 09 17:00:02 2008 +0200
@@ -0,0 +1,157 @@
+/**
+ * Copyright: Copyright (c) 2008 Jacob Carlborg. All rights reserved.
+ * Authors: Jacob Carlborg
+ * Version: Initial created: 2008
+ * License: $(LINK2 http://opensource.org/licenses/bsd-license.php, BSD Style)
+ * 
+ */
+module dwt.internal.objc.runtime;
+
+import tango.stdc.stringz : fromStringz, toStringz;
+
+import dwt.dwthelper.utils : string;
+static import dwt.internal.objc.bindings;
+
+alias objc_ivar* Ivar;
+alias objc_method* Method;
+alias objc_object Protocol;
+
+alias char* SEL;
+alias objc_class* Class;
+alias objc_object* id;
+
+alias extern (C) id function(id, SEL, ...) IMP;
+
+struct objc_object
+{
+    Class isa;
+}
+
+struct objc_super
+{
+    id receiver;
+    Class clazz;
+}
+
+struct objc_class
+{
+    Class isa;
+    Class super_class;
+    const char* name;
+    int versionn;
+    int info;
+    int instance_size;
+    objc_ivar_list* ivars;
+    objc_method_list** methodLists;
+    objc_cache* cache;
+    objc_protocol_list* protocols;
+}
+
+struct objc_ivar
+{
+    char* ivar_name;
+    char* ivar_type;
+    int ivar_offset;
+
+    version (X86_64)
+        int space;
+}
+
+struct objc_ivar_list
+{
+    int ivar_count;
+
+    version (X86_64)
+        int space;
+
+    /* variable length structure */
+    objc_ivar ivar_list[1];
+}
+
+struct objc_method
+{
+    SEL method_name;
+    char* method_types;
+    IMP method_imp;
+}
+
+struct objc_method_list
+{
+    objc_method_list* obsolete;
+
+    int method_count;
+
+    version (X86_64)
+        int space;
+
+    /* variable length structure */
+    objc_method method_list[1];
+}
+
+struct objc_cache
+{
+    uint mask /* total = mask + 1 */;
+    uint occupied;
+    Method buckets[1];
+}
+
+struct objc_protocol_list
+{
+    objc_protocol_list* next;
+    long count;
+    Protocol* list[1];
+}
+
+template Runtime ()
+{   
+    alias dwt.internal.objc.bindings.objc_msgSendSuper objc_msgSendSuper;
+    alias dwt.internal.objc.bindings.objc_registerClassPair objc_registerClassPair;
+    alias dwt.internal.objc.bindings.objc_msgSend objc_msgSend;
+    alias dwt.internal.objc.bindings.objc_msgSend_fpret objc_msgSend_fpret;
+    alias dwt.internal.objc.bindings.objc_msgSend_stret objc_msgSend_stret;
+    
+    bool class_addIvar (Class cls, string name, size_t size, byte alignment, string types)
+    {
+        return dwt.internal.objc.bindings.class_addIvar(cls, name.toStringz(), size, alignment, types.toStringz());
+    }
+
+    bool class_addMethod (Class cls, SEL name, IMP imp, string types)
+    {
+        return dwt.internal.objc.bindings.class_addMethod(cls, name, imp, types.toStringz());
+    }
+
+    Class objc_allocateClassPair (Class superclass, string name, size_t extraBytes)
+    {
+        return dwt.internal.objc.bindings.objc_allocateClassPair(superclass, name.toStringz(), extraBytes);
+    }
+
+    id objc_getClass (string name)
+    {
+        return dwt.internal.objc.bindings.objc_getClass(name.toStringz());
+    }
+
+    id objc_lookUpClass (string name)
+    {
+        return dwt.internal.objc.bindings.objc_lookUpClass(name.toStringz());
+    }
+
+    string object_getClassName (id obj)
+    {
+        return fromStringz(dwt.internal.objc.bindings.object_getClassName(obj));
+    }
+
+    Ivar object_getInstanceVariable (id obj, string name, void** outValue)
+    {
+        return dwt.internal.objc.bindings.object_getInstanceVariable(obj, name.toStringz(), outValue);
+    }
+
+    Ivar object_setInstanceVariable (id obj, string name, void* value)
+    {
+        return dwt.internal.objc.bindings.object_setInstanceVariable(obj, name.toStringz(), value);
+    }
+
+    string sel_registerName (string str)
+    {
+        return fromStringz(dwt.internal.objc.bindings.sel_registerName(str.toStringz()));
+    }
+}