fxruby-commits

[Lyle J. <ly...@us...>]

Update of /cvsroot/fxruby/FXRuby/swig-interfaces
In directory usw-pr-cvs1:/tmp/cvs-serv20002

Modified Files:
      Tag: release10
	typemaps.i 
Log Message:
Added in typemap for FXString and corrected out typemap for FXQuat.


Index: typemaps.i
===================================================================
RCS file: /cvsroot/fxruby/FXRuby/swig-interfaces/typemaps.i,v
retrieving revision 1.35
retrieving revision 1.35.2.1
diff -C2 -d -r1.35 -r1.35.2.1
*** typemaps.i	3 Apr 2002 21:40:57 -0000	1.35
--- typemaps.i	24 Apr 2002 15:59:26 -0000	1.35.2.1
***************
*** 29,32 ****
--- 29,42 ----
  
  /* Convert Ruby string to FXString */
+ %typemap(ruby, in) FXString {
+   if ($input != Qnil) {
+     Check_Type($input, T_STRING);
+     $1 = FXString(STR2CSTR($input));
+   } else {
+     $1 = FXString::null;
+   }
+ }
+ 
+ /* Convert Ruby string to const FXString& */
  %typemap(ruby, in) const FXString& {
    if ($input != Qnil) {
***************
*** 353,357 ****
  %typemap(ruby, out) FXQuat {
      FXQuat *resultptr = new FXQuat($1);
!     $result = FXRbGetRubyObj($1, "FXQuat *");
  }
  %typemap(ruby, out) FXQuat& "$result = FXRbGetRubyObj($1, \"$1_ltype\");";
--- 363,367 ----
  %typemap(ruby, out) FXQuat {
      FXQuat *resultptr = new FXQuat($1);
!     $result = FXRbGetRubyObj(resultptr, "FXQuat *");
  }
  %typemap(ruby, out) FXQuat& "$result = FXRbGetRubyObj($1, \"$1_ltype\");";