#DOCUMENTATION by cg
authorClaus Gittinger <cg@exept.de>
Thu, 14 Apr 2016 19:08:20 +0200
changeset 1393 50384f233a0f
parent 1392 c93700ea3e05
child 1394 26de106a37e1
#DOCUMENTATION by cg class: RegressionTests::Win32OLETests changed: #test00_loadOLE
RegressionTests__Win32OLETests.st
--- a/RegressionTests__Win32OLETests.st	Thu Apr 14 19:08:10 2016 +0200
+++ b/RegressionTests__Win32OLETests.st	Thu Apr 14 19:08:20 2016 +0200
@@ -21,10 +21,7 @@
 test00_loadOLE
     |iid_IEnum|
 
-    OperatingSystem isMSWINDOWSlike ifFalse:[
-        Transcript showCR:'test skipped (OS is not WINDOWS)'.
-        ^ self.
-    ].
+    self skipIf:[OperatingSystem isMSWINDOWSlike not] description:'test skipped (OS is not WINDOWS)'.
 
     Smalltalk at:#ExternalLibraryFunction:Verbose put:true.
     Smalltalk at:#ObjectFileLoader:Verbose put:true.