target  : (1,0x33) EqVarBool
status  : emitted
from    : discovery snippet 'arr_foreach_Bool' (minimised)

' ---- modProbe.bas
Option Explicit

Public Sub Main()
  Dim a(5) As Boolean, x As Variant
  For Each x In a
    If x = x Then Exit For
  Next
End Sub

target disasm lines:
  modProbe.Sub Main | 401460    FB33                  EqVarBool
