Update of /cvsroot/jcframework/Nunit/InheritedClasses
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16325/InheritedClasses
Modified Files:
AtomsFrameworkTests.vb
Log Message:
Extra tests for caching objects with event listeners.
Index: AtomsFrameworkTests.vb
===================================================================
RCS file: /cvsroot/jcframework/Nunit/InheritedClasses/AtomsFrameworkTests.vb,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -d -r1.16 -r1.17
--- AtomsFrameworkTests.vb 1 Apr 2005 00:00:10 -0000 1.16
+++ AtomsFrameworkTests.vb 4 Apr 2005 23:59:52 -0000 1.17
@@ -213,6 +213,24 @@
Assert.IsTrue(emp.Persistent)
End Sub
+ <Test()> Public Sub CacheTest2()
+ 'Check that local object changes don't impact the cache
+ emp.Name = "Initial2"
+ emp.Find()
+ Assert.IsFalse(emp.Persistent)
+ emp.Save()
+ pbroker.ClearCache()
+ emp = New CEmployee
+ emp.Name = "Initial2"
+ emp.Find()
+ 'Change local copy
+ emp.Name = "Final"
+ emp = New CEmployee
+ emp.Name = "Initial2"
+ emp.Find()
+ Assert.AreEqual("Initial2", emp.Name)
+ End Sub
+
<Test()> Public Sub AutoDelete()
Dim a As New TableA
Dim b As New TableB
|