|
From: Martin R. <ru...@us...> - 2004-08-05 22:30:46
|
Update of /cvsroot/foo/foo/elkfoo/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5167 Modified Files: bpf.m module.m soundfile.m Log Message: [class description] -> [[class description] cString] (char * instead of NSString *) [snd dealloc] -> RELEASE(snd) (never call dealloc directly, since that violates the reference counting mechanism. instead use [snd release] or the GC-safe RELEASE() macro) Index: soundfile.m =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/src/soundfile.m,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** soundfile.m 5 Aug 2004 18:58:52 -0000 1.2 --- soundfile.m 5 Aug 2004 22:30:31 -0000 1.3 *************** *** 332,337 **** Primitive_Error("internal inconsistency"); } ! // [snd free]; ! [snd dealloc]; // Alloca_End; --- 332,336 ---- Primitive_Error("internal inconsistency"); } ! RELEASE(snd); // Alloca_End; Index: bpf.m =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/src/bpf.m,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** bpf.m 5 Aug 2004 18:58:52 -0000 1.3 --- bpf.m 5 Aug 2004 22:30:31 -0000 1.4 *************** *** 68,72 **** BPF_T(bpf)->type = Null; BPF_T(bpf)->context = Get_Context(); ! BPF_T(bpf)->type = Intern((char*)[[object class] name]); GC_Unlink; return bpf; --- 68,72 ---- BPF_T(bpf)->type = Null; BPF_T(bpf)->context = Get_Context(); ! BPF_T(bpf)->type = Intern([[[object class] description] cString]); GC_Unlink; return bpf; Index: module.m =================================================================== RCS file: /cvsroot/foo/foo/elkfoo/src/module.m,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** module.m 5 Aug 2004 18:58:52 -0000 1.2 --- module.m 5 Aug 2004 22:30:31 -0000 1.3 *************** *** 91,95 **** MODULE_T(module)->type = Null; MODULE_T(module)->context = Get_Context(); ! MODULE_T(module)->type = Intern((char*)[class name]); GC_Unlink; return module; --- 91,95 ---- MODULE_T(module)->type = Null; MODULE_T(module)->context = Get_Context(); ! MODULE_T(module)->type = Intern([[class description] cString]); GC_Unlink; return module; |