target  : (0,0x85) IStI4
status  : emitted
from    : discovery snippet 'st_byref_I4' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim a As Long
End Sub

Sub P(x As Long)
  Dim b As Long
  b = x
  x = b
End Sub

target disasm lines:
  modProbe.Proc_401490 | 401499    85 0C00               IStI4 arg_C
