You are viewing a plain text version of this content. The canonical link for it is here.
Posted to soap-dev@xml.apache.org by du...@apache.org on 2001/03/22 19:18:31 UTC
cvs commit: xml-soap/java/samples/com/server APACHEADDER.dll APACHESUM.dll adder.cls totals.cls
dug 01/03/22 10:18:30
Modified: java/samples/com/server APACHEADDER.dll APACHESUM.dll
adder.cls totals.cls
Log:
Updating the com provider sample
Submitted by Rick Rineholt: rineholt@us.ibm.com
Revision Changes Path
1.2 +11 -8 xml-soap/java/samples/com/server/APACHEADDER.dll
<<Binary file>>
1.2 +17 -19 xml-soap/java/samples/com/server/APACHESUM.dll
<<Binary file>>
1.2 +1 -1 xml-soap/java/samples/com/server/adder.cls
Index: adder.cls
===================================================================
RCS file: /home/cvs/xml-soap/java/samples/com/server/adder.cls,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- adder.cls 2001/03/14 19:39:02 1.1
+++ adder.cls 2001/03/22 18:18:21 1.2
@@ -67,7 +67,7 @@
' <http://www.apache.org/>.
-Public Function add(ByVal n1 As Integer, ByVal n2 As Integer)
+Public Function add(ByVal n1 As Integer, ByVal n2 As Integer) As Integer
add = n1 + n2
End Function
1.2 +2 -2 xml-soap/java/samples/com/server/totals.cls
Index: totals.cls
===================================================================
RCS file: /home/cvs/xml-soap/java/samples/com/server/totals.cls,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- totals.cls 2001/03/14 19:39:02 1.1
+++ totals.cls 2001/03/22 18:18:23 1.2
@@ -77,9 +77,9 @@
Public Property Let total(ByVal n As Long)
result = n
End Property
-Public Function sum(ByVal n1 As Long) As Long
+Public Sub sum(ByVal n1 As Long)
result = result + n1
-End Function
+End Sub
Public Sub Class_Initialize()
result = 0
Set fs = CreateObject("Scripting.FileSystemObject")