diff options
Diffstat (limited to 'vb/demo/Ice/value/InitialI.vb')
-rwxr-xr-x | vb/demo/Ice/value/InitialI.vb | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/vb/demo/Ice/value/InitialI.vb b/vb/demo/Ice/value/InitialI.vb index 570d65f195e..024a64a8388 100755 --- a/vb/demo/Ice/value/InitialI.vb +++ b/vb/demo/Ice/value/InitialI.vb @@ -13,17 +13,17 @@ Public Class InitialI Inherits Initial Public Sub New(ByVal adapter As Ice.ObjectAdapter) - _simple = New Simple - _simple.message = "a message 4 u" + _simple = New Simple + _simple.message = "a message 4 u" - _printer = New PrinterI - _printer.message = "Ice rulez!" - _printerProxy = PrinterPrxHelper.uncheckedCast(adapter.addWithUUID(_printer)) + _printer = New PrinterI + _printer.message = "Ice rulez!" + _printerProxy = PrinterPrxHelper.uncheckedCast(adapter.addWithUUID(_printer)) - _derivedPrinter = New DerivedPrinterI - _derivedPrinter.message = _printer.message - _derivedPrinter.derivedMessage = "a derived message 4 u" - adapter.addWithUUID(_derivedPrinter) + _derivedPrinter = New DerivedPrinterI + _derivedPrinter.message = _printer.message + _derivedPrinter.derivedMessage = "a derived message 4 u" + adapter.addWithUUID(_derivedPrinter) End Sub Public Overloads Overrides Function getSimple(ByVal current As Ice.Current) As Simple @@ -46,7 +46,7 @@ Public Class InitialI End Sub Public Overloads Overrides Sub shutdown(ByVal current As Ice.Current) - current.adapter.getCommunicator().shutdown() + current.adapter.getCommunicator().shutdown() End Sub Private _simple As Simple |