|
@@ -47,6 +47,8 @@ Class T Extends Void
|
|
|
|
|
|
Method New( x:Int )
|
|
|
|
|
|
+ Operator=:Bool( t:T )="operator=="
|
|
|
+
|
|
|
Function Destroy( t:T )="delete"
|
|
|
|
|
|
End
|
|
@@ -73,6 +75,8 @@ Function Main()
|
|
|
|
|
|
Local t:=New T 'T::T()
|
|
|
|
|
|
+ If t=t Print "Yes" 'T::operator==(T*), "Yes"
|
|
|
+
|
|
|
T.Destroy( t ) 'T::~T()
|
|
|
|
|
|
New C().E() 'C::C(), ::glue_E()
|