target  : (5,0x04) StAryRecCopy
status  : emitted
from    : discovery snippet 'udt_arr_assign' (minimised)

' ---- modProbe.bas
Option Explicit
Private Type TRec
  a As Long
  s As String
  v As Variant
  o As Object
End Type
Private Type TPlain
  a As Long
  b As Integer
End Type

Public Sub Main()
  Dim r() As TRec, q() As TRec
  q = r
End Sub

target disasm lines:
  modProbe.Sub Main | 40147A    FF04 0000             StAryRecCopy
