[prev in list] [next in list] [prev in thread] [next in thread] 

List:       kde-commits
Subject:    branches/KDE/3.5/kdebindings/kalyptus
From:       Richard Dale <Richard_Dale () tipitina ! demon ! co ! uk>
Date:       2006-01-06 9:12:30
Message-ID: 1136538750.482323.24563.nullmailer () svn ! kde ! org
[Download RAW message or body]

SVN commit 494752 by rdale:

* The '_signalInterceptor' field is now called 'Q_EMIT'
* Added a 'SmokeClass' attribute with the C++ class name of 
  a Qyoto/Kimono class



 M  +7 -5      kalyptusCxxToKimono.pm  


--- branches/KDE/3.5/kdebindings/kalyptus/kalyptusCxxToKimono.pm #494751:494752
@@ -407,7 +407,7 @@
 
 	$qobjectExtras = <<EOF;
 
-		protected Object _signalInterceptor = null;
+		protected Object Q_EMIT = null;
 EOF
 
 	$qwidgetExtras = <<EOF;
@@ -1231,7 +1231,8 @@
 		$classdec = "\tpublic class $csharpClassName {\n";
 		$classdec .= "\t\tprotected Object _interceptor = null;\n";
 	} elsif ( $#ancestors < 0 ) {
-		$classdec = "\tpublic class $csharpClassName : MarshalByRefObject";
+		$classdec = "\t[SmokeClass(\"$className\")]\n";
+		$classdec .= "\tpublic class $csharpClassName : MarshalByRefObject";
 		if ( defined interfaceForClass($csharpClassName) ) {
 			$classdec .= ", " . interfaceForClass($csharpClassName);
 		}
@@ -1244,7 +1245,8 @@
 		$classdec .= " \n\t\tprivate IntPtr _smokeObject;\n";
 		$classdec .= " \t\tprotected $csharpClassName(Type dummy) {}\n";
 	} else {
-		$classdec = "\tpublic class $csharpClassName : ";
+		$classdec = "\t[SmokeClass(\"$className\")]\n";
+		$classdec .= "\tpublic class $csharpClassName : ";
 		my $ancestor;
 		foreach $ancestor ( @ancestors ) {
 			if ( !defined interfaceForClass($ancestor) or $ancestor eq \
@ancestors[$#ancestors] ) { @@ -1347,10 +1349,10 @@
  	if ( is_kindof($node, "QObject") ) {
 		print CLASS "\t\tprotected void Create" . $csharpClassName . "SignalProxy() {\n";
 		print CLASS "\t\t\tSignalInvocation realProxy = new SignalInvocation(typeof(I" . \
                $csharpClassName . "Signals), this);\n";
-		print CLASS "\t\t\t_signalInterceptor = (I" . $csharpClassName . "Signals) \
realProxy.GetTransparentProxy();\n"; +		print CLASS "\t\t\tQ_EMIT = (I" . \
$csharpClassName . "Signals) realProxy.GetTransparentProxy();\n";  print CLASS \
"\t\t}\n";  print CLASS "\t\tprotected new I" . $csharpClassName . "Signals Emit() \
                {\n";
-		print CLASS "\t\t\treturn (I" . $csharpClassName . "Signals) \
_signalInterceptor;\n"; +		print CLASS "\t\t\treturn (I" . $csharpClassName . \
"Signals) Q_EMIT;\n";  print CLASS "\t\t}\n";
     	print CLASS "\t}\n";
 


[prev in list] [next in list] [prev in thread] [next in thread] 

Configure | About | News | Add a list | Sponsored by KoreLogic