1144 lines · 26.7 KB · C
RawDownload
# 1 "Object.m"struct _PRIVATE { struct _PRIVATE *isa; };typedef struct _PRIVATE *id;struct _SHARED {  id isa;  id clsSuper;  char *clsName;  char *clsTypes;  short clsSizInstance;  short clsSizDict;  struct _SLT *clsDispTable;  long clsStatus;  struct modDescriptor *clsMod;  unsigned clsVersion;  id clsCats;  id *clsGlbl;};extern id  (* _imp(id,char*))();extern id  (* _impSuper(id,char*))();extern struct modDescriptor  *_OBJCBIND_Object(void);static char **selTransTbl;struct _SLT {char *_cmd;id (*_imp)();};struct modDescriptor {  char *modName;  char *modVersion;  long modStatus;  char *modMinSel;  char *modMaxSel;  id *modClsLst;  short modSelRef;  char **modSelTbl;  struct methodDescriptor *modMapTbl;};extern struct modDescriptor Object_modDesc; # 1 "../../util/stdarg.h"#include <stdarg.h> # 1 "../../util/stdio.h"#include <stdio.h> # 1 "../../util/stddef.h"#include <stddef.h> # 55 "objcrt.h"typedef char*SEL;typedef char*STR;typedef char BOOL;typedef FILE*IOD;typedef id SHR;# 64 "objcrt.h"typedef id(*IMP)();  typedef void(*ARGIMP)(id,SEL,void*);# 1 "../../util/stdarg.h"#include <stdarg.h> # 117 "objcrt.h"struct objcrt_private{id isa;# 123 "objcrt.h"unsigned short attr;unsigned short objID; }; struct objcrt_shared{id isa;# 134 "objcrt.h"id clsSuper;char*clsName;char*clsTypes;short clsSizInstance;short clsSizDict;struct objcrt_slt*clsDispTable;long clsStatus;struct objcrt_modDescriptor*clsMod;unsigned clsVersion;id clsCats;id*clsGlbl;}; typedef struct objcrt_shared*Cls_t;# 179 "objcrt.h"struct objcrt_slt{SEL _cmd;IMP _imp;};# 189 "objcrt.h"struct objcrt_useDescriptor{int processed;struct objcrt_useDescriptor*next;struct objcrt_useDescriptor***uses;struct objcrt_modDescriptor*(*bind)();};# 201 "objcrt.h"typedef struct hashedSelector{struct hashedSelector*next;STR key;}HASH,*PHASH;# 213 "objcrt.h"typedef struct objcrt_modDescriptor MOD,*PMOD;typedef struct objcrt_methodDescriptor METH,*PMETH; struct objcrt_modDescriptor{STR modName;STR modVersion;long modStatus;SEL modMinSel;SEL modMaxSel;id*modClsLst;short modSelRef;SEL*modSelTbl;PMETH modMapTbl;}; struct objcrt_modEntry{PMOD(*modLink)();PMOD modInfo;}; typedef struct objcrt_modEntry*Mentry_t; struct objcrt_methodDescriptor{id*cls;SEL*sel;IMP imp;};# 256 "objcrt.h"extern BOOL msgFlag;extern FILE*msgIOD;extern FILE*dbgIOD;extern BOOL allocFlag;extern BOOL dbgFlag;extern BOOL noCacheFlag;extern BOOL noNilRcvr;# 269 "objcrt.h"SEL selUid(STR);STR selName(SEL);void dbg(char*fmt,...);void prnstack(FILE*file);void loadobjc(void*modPtr);void unloadobjc(void*modPtr);# 287 "objcrt.h"IMP _imp(id,SEL);IMP _impSuper(id,SEL);# 292 "objcrt.h"IMP fwdimp(id,SEL,IMP);IMP fwdimpSuper(id,SEL,IMP);void fwdmsg(id,SEL,void*,ARGIMP);id selptrfwd(id,SEL,id,id,id,id);  id idincref(id obj);id idassign(id*lhs,id rhs);id iddecref(id obj);# 321 "objcrt.h"extern id(*oc_alloc)(id,unsigned int);extern id(*oc_dealloc)(id);extern id(*oc_copy)(id,unsigned int);extern id(*oc_error)(id,STR,va_list); extern id(*oc_cvtToId)(STR);extern SEL(*oc_cvtToSel)(STR); extern id(*_fileIn)(FILE*);extern BOOL(*_fileOut)(FILE*,id);extern BOOL(*_storeOn)(STR,id);extern id(*_readFrom)(STR);void setfilein(id(*f)(FILE*));void setfileout(BOOL(*f)(FILE*,id)); extern id(*_showOn)(id,unsigned); void*OC_Malloc(size_t);void*OC_MallocAtomic(size_t);void*OC_Calloc(size_t);void*OC_Realloc(void*,size_t);void*OC_Free(void*data); void addSubclassesTo(id c,STR name); id newsubclass(STR name,id superClass,int ivars,int cvars);void linkclass(id aclass);void unlinkclass(id aclass); void addMethods(id src,id dst); void poseAs(id posing,id target);id swapclass(id self,id target);# 1 "../../util/string.h"#include <string.h> # 1 "../../util/stdio.h"#include <stdio.h> # 42 "Block.h"extern id newBlock(int n,IMP fn,void*data,IMP dtor);# 1 "../../util/stdio.h"#include <stdio.h> # 40 "Object.h"struct Object_PRIVATE { id isa;# 46 "Object.h"unsigned short attr;unsigned short objID;}; # 40 "Object.h"extern id  Object; # 40 "Object.h"extern struct _SHARED _Object;extern struct _SHARED __Object;  # 41 "Object.m"static id c_Object_initialize(struct Object_PRIVATE *self,SEL _cmd){return(id)self;} static id i_Object_initialize(struct Object_PRIVATE *self,SEL _cmd){return(id)self;} # 58 "Object.m"static id i_Object_str_(struct Object_PRIVATE *self,SEL _cmd,STR s){id objcT0; # 60 "Object.m"return(objcT0=(id)self,(*_imp(objcT0,selTransTbl[0]))(objcT0,selTransTbl[0]));} static id c_Object_new(struct Object_PRIVATE *self,SEL _cmd){id newObject=( *oc_alloc)((id)self,0);return newObject;} static id i_Object_new(struct Object_PRIVATE *self,SEL _cmd){id objcT1; # 71 "Object.m"return(objcT1=(id)self,(*_imp(objcT1,selTransTbl[0]))(objcT1,selTransTbl[0]));} static id i_Object_increfs(struct Object_PRIVATE *self,SEL _cmd){return(id)0;} static id i_Object_copy(struct Object_PRIVATE *self,SEL _cmd){id objcT2; # 81 "Object.m"id newObject=( *oc_copy)((id)self,0);(objcT2=newObject,(*_imp(objcT2,selTransTbl[1]))(objcT2,selTransTbl[1]));return newObject;} static id i_Object_deepCopy(struct Object_PRIVATE *self,SEL _cmd){id objcT3; # 88 "Object.m"id newObject=( *oc_copy)((id)self,0);(objcT3=newObject,(*_imp(objcT3,selTransTbl[1]))(objcT3,selTransTbl[1]));return newObject;} static id i_Object_free(struct Object_PRIVATE *self,SEL _cmd){self-># 98 "Object.m"isa=(id)0;return(oc_dealloc)?( *oc_dealloc)((id)self):(id)0; } static id i_Object_decrefs(struct Object_PRIVATE *self,SEL _cmd){return(id)0;} static id i_Object_release(struct Object_PRIVATE *self,SEL _cmd){id objcT4;return(objcT4=(id)self,(*_imp(objcT4,selTransTbl[0]))(objcT4,selTransTbl[0]));# 116 "Object.m"} static id c_Object_free(struct Object_PRIVATE *self,SEL _cmd){return(id)0;} static id c_Object_release(struct Object_PRIVATE *self,SEL _cmd){return(id)0;} # 135 "Object.m"static id i_Object_self(struct Object_PRIVATE *self,SEL _cmd){return(id)self;} static id i_Object_yourself(struct Object_PRIVATE *self,SEL _cmd){return(id)self;} static id i_Object_class(struct Object_PRIVATE *self,SEL _cmd){id objcT5; # 147 "Object.m"return(objcT5=self->isa,(*_imp(objcT5,selTransTbl[2]))(objcT5,selTransTbl[2]));}static id i_Object_superclass(struct Object_PRIVATE *self,SEL _cmd){id objcT6; # 151 "Object.m"return(objcT6=self->isa,(*_imp(objcT6,selTransTbl[3]))(objcT6,selTransTbl[3]));}static id i_Object_superClass(struct Object_PRIVATE *self,SEL _cmd){id objcT7; # 155 "Object.m"return(objcT7=self->isa,(*_imp(objcT7,selTransTbl[4]))(objcT7,selTransTbl[4]));} static id c_Object_class(struct Object_PRIVATE *self,SEL _cmd){return(id)self;} static id c_Object_superclass(struct Object_PRIVATE *self,SEL _cmd){return((Cls_t)((id)self))->clsSuper;} static id c_Object_superClass(struct Object_PRIVATE *self,SEL _cmd){return((Cls_t)((id)self))->clsSuper;} static id i_Object_add_(struct Object_PRIVATE *self,SEL _cmd,id anObject){id objcT8; # 175 "Object.m"return(objcT8=(id)self,(*_imp(objcT8,selTransTbl[0]))(objcT8,selTransTbl[0]));} static STR i_Object_name(struct Object_PRIVATE *self,SEL _cmd){id objcT9; # 180 "Object.m"return(objcT9=self->isa,(*(STR(*)(id,SEL))_imp(objcT9,selTransTbl[5]))(objcT9,selTransTbl[5]));} static STR c_Object_name(struct Object_PRIVATE *self,SEL _cmd){return((Cls_t)((id)self))->clsName;} static id i_Object_findClass_(struct Object_PRIVATE *self,SEL _cmd,STR name){return( *oc_cvtToId)(name);} static SEL i_Object_findSel_(struct Object_PRIVATE *self,SEL _cmd,STR name){ return( *oc_cvtToSel)(name);} static SEL i_Object_selOfSTR_(struct Object_PRIVATE *self,SEL _cmd,STR name){id objcT10; # 201 "Object.m"SEL aSel=(objcT10=(id)self,(*(SEL(*)(id,SEL,STR))_imp(objcT10,selTransTbl[6]))(objcT10,selTransTbl[6],name));if(aSel){return aSel;}else{id objcT11; # 208 "Object.m"(objcT11=(id)self,(*(id(*)(id,SEL,STR,...))_imp(objcT11,selTransTbl[7]))(objcT11,selTransTbl[7],"Selector not found in selector table."));return NULL;}} static id i_Object_idOfSTR_(struct Object_PRIVATE *self,SEL _cmd,STR aClassName){id objcT12; # 215 "Object.m"id aClass=(objcT12=(id)self,(*(id(*)(id,SEL,STR))_imp(objcT12,selTransTbl[8]))(objcT12,selTransTbl[8],aClassName));if(aClass){return aClass;}else{id objcT13; # 222 "Object.m"return(objcT13=(id)self,(*(id(*)(id,SEL,STR,...))_imp(objcT13,selTransTbl[7]))(objcT13,selTransTbl[7],"Class not linked in application."));}} # 233 "Object.m"static unsigned i_Object_hash(struct Object_PRIVATE *self,SEL _cmd){# 239 "Object.m"return(unsigned)((id)self-(id)0);} static BOOL i_Object_isEqual_(struct Object_PRIVATE *self,SEL _cmd,id anObject){return(BOOL)(anObject==(id)self);} static STR i_Object_str(struct Object_PRIVATE *self,SEL _cmd){id objcT14; # 249 "Object.m"return(objcT14=self->isa,(*(STR(*)(id,SEL))_imp(objcT14,selTransTbl[5]))(objcT14,selTransTbl[5]));} static unsigned i_Object_size(struct Object_PRIVATE *self,SEL _cmd){return 0;} static BOOL c_Object_isEqual_(struct Object_PRIVATE *self,SEL _cmd,id anObject){return(BOOL)((id)self==anObject);} static BOOL i_Object_isSame_(struct Object_PRIVATE *self,SEL _cmd,id anObject){return(BOOL)((id)self==anObject);} static BOOL i_Object_notEqual_(struct Object_PRIVATE *self,SEL _cmd,id anObject){id objcT15; # 269 "Object.m"return(objcT15=(id)self,(*(BOOL(*)(id,SEL,id))_imp(objcT15,selTransTbl[9]))(objcT15,selTransTbl[9],anObject))==(BOOL)0;} static BOOL i_Object_notSame_(struct Object_PRIVATE *self,SEL _cmd,id anObject){id objcT16; # 274 "Object.m"return(BOOL) !(objcT16=(id)self,(*(BOOL(*)(id,SEL,id))_imp(objcT16,selTransTbl[10]))(objcT16,selTransTbl[10],anObject));} static int i_Object_compare_(struct Object_PRIVATE *self,SEL _cmd,id anObject){id objcT17; # 279 "Object.m"(objcT17=(id)self,(*_imp(objcT17,selTransTbl[11]))(objcT17,selTransTbl[11]));return 0;} static int i_Object_invertCompare_(struct Object_PRIVATE *self,SEL _cmd,id anObject){id objcT18; # 285 "Object.m"

Lines 1–500 of 1144.

Keyboard shortcuts

General

Show keyboard shortcuts
?
Focus the current search
/

Issues and pull requests

Open filters
f

Issues, pull requests and Inbox

Select next item
j↓
Select previous item
k↑
Open selected item
Enter
Dismiss filters or clear selection
Esc

Repository code

Go to file
t