From: Lyle J. <ly...@us...> - 2002-05-08 20:08:04
|
Update of /cvsroot/fxruby/FXRuby/swig-interfaces In directory usw-pr-cvs1:/tmp/cvs-serv31707 Modified Files: Tag: release10 FXScintilla.i Log Message: Incorporated Gilles' stuff for Scintilla TextRange struct. Index: FXScintilla.i =================================================================== RCS file: /cvsroot/fxruby/FXRuby/swig-interfaces/FXScintilla.i,v retrieving revision 1.9.2.3 retrieving revision 1.9.2.4 diff -C2 -d -r1.9.2.3 -r1.9.2.4 *** FXScintilla.i 6 May 2002 19:16:29 -0000 1.9.2.3 --- FXScintilla.i 8 May 2002 19:53:18 -0000 1.9.2.4 *************** *** 71,74 **** --- 71,96 ---- }; + struct TextRange { + %immutable; + char *lpstrText; + %mutable; + %extend { + // "Construct" a TextRange instance + TextRange(int start,int last,size_t size){ + TextRange *tr=new TextRange; + tr->chrg.cpMin=start; + tr->chrg.cpMax=last; + tr->lpstrText=ALLOC_N(char,size); + return tr; + } + + // Destructor + ~TextRange(){ + free(self->lpstrText); + delete self; + } + } + }; + %exception FXScintilla::FXScintilla "$action FXRbRegisterRubyObj(self, result);"; |