target  : (3,0x28) IStAd
status  : emitted
from    : discovery snippet 'st_byref_Obj' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim a As Object
End Sub

Sub P(x As Object)
  Dim b As Object
  Set b = x
  Set x = b
End Sub

target disasm lines:
  modProbe.Proc_401494 | 40149E    FD28 0C00             IStAd arg_C
