anchor.diff:  End Function
   
   Function GetLogicalDisks(ByVal DriveDevice)
  -	Set GetLogicalDisks = CreateObject("System.Collections.ArrayList")
  +	Set GetLogicalDisks = new List
   	Set DrivePartitionsColumn = WMIService.ExecQuery _
   		("ASSOCIATORS OF {Win32_DiskDrive.DeviceID=""" & _
   			DriveDevice & """} WHERE AssocClass = " & _
  
positive.code: 		Wscript.Echo "mountpoints: []"
  	Else
  		Wscript.Echo "mountpoints:"
  		For Each Mountpoint In TopLevelDrive.Item("Mountpoints")
  			Wscript.Echo "  - path: """ & Mountpoint & """"
  		Next
  	End If
  
  
negative.code: 	Next
  End Function
  
  For Each TopLevelDrive In GetTopLevelDrives().GetArray()
  	Wscript.Echo "device: """ & TopLevelDrive.Item("Device") & """"
  	Wscript.Echo "description: """ & TopLevelDrive.Item("Description") & """"
  	Wscript.Echo "size: " & TopLevelDrive.Item("Size")
  