Mailinglist Archive: zypp-commit (266 mails)

< Previous Next >
[zypp-commit] r11662 - /trunk/sat-solver/bindings/solvable.i
  • From: kkaempf@xxxxxxxxxxxxxxxx
  • Date: Wed, 12 Nov 2008 14:41:38 -0000
  • Message-id: <20081112144138.D8DF73727D@xxxxxxxxxxxxxxxx>
Author: kkaempf
Date: Wed Nov 12 15:41:38 2008
New Revision: 11662

URL: http://svn.opensuse.org/viewcvs/zypp?rev=11662&view=rev
Log:
define solvable equality for Perl: same pool, same id

Modified:
trunk/sat-solver/bindings/solvable.i

Modified: trunk/sat-solver/bindings/solvable.i
URL:
http://svn.opensuse.org/viewcvs/zypp/trunk/sat-solver/bindings/solvable.i?rev=11662&r1=11661&r2=11662&view=diff
==============================================================================
--- trunk/sat-solver/bindings/solvable.i (original)
+++ trunk/sat-solver/bindings/solvable.i Wed Nov 12 15:41:38 2008
@@ -55,6 +55,10 @@
%typemap(out) int equal
"$result = ($1 != 0) ? Qtrue : Qfalse;";
#endif
+#if defined(SWIGPERL)
+ int __eq__( XSolvable *xs )
+ { return xsolvable_equal( $self, xs); }
+#endif
int equal( XSolvable *xs )
{ return xsolvable_equal( $self, xs); }


--
To unsubscribe, e-mail: zypp-commit+unsubscribe@xxxxxxxxxxxx
For additional commands, e-mail: zypp-commit+help@xxxxxxxxxxxx

< Previous Next >
This Thread
  • No further messages