--- a/RegressionTests__Win32OperatingSystemTest.st	Mon Dec 10 15:24:26 2018 +0100
+++ b/RegressionTests__Win32OperatingSystemTest.st	Mon Dec 10 15:49:08 2018 +0100
@@ -852,14 +852,11 @@
     "Testing reading non-string value from Registry via valueNamed
      User should see a warning message in Transcript"
 
-    | readData testingRegistryPath |
+    | testingRegistryPath |
     
-    readData := Unicode16String new.    
     testingRegistryPath := Win32OperatingSystem registryEntry key: registryPath.
-     
-    readData := testingRegistryPath valueNamed: 11.
-        
-    self assert: readData isNil.
+    
+    self should: [ testingRegistryPath valueNamed: 11 ] raise: Error
 
     "
      self run:#testReadValueNamed_nonStringValue
@@ -867,6 +864,7 @@
     "
 
     "Created: / 05-12-2018 / 12:40:31 / svestkap"
+    "Modified: / 10-12-2018 / 15:47:37 / svestkap"
 ! !
 
 !Win32OperatingSystemTest methodsFor:'tests-unicodeReadEnumeration'!