; Fieldtest mut-local #6 — deliberate diagnostic probe. EXPECTED TO
; FAIL at `ail check`.
;
; Probes `mut-var-unsupported-type` — declaring a Str mut-var.
; (A sibling fixture used to probe `assign-type-mismatch` by assigning
; 1.5 to an Int var; on the same surface the diagnostic also fires
; with the same double-bracket-prefix shape.)

(module mut-local_6_diag_probe

  (fn main
    (type (fn-type (params) (ret (con Unit)) (effects IO)))
    (params)
    (body
      (app print
        (mut
          (var s (con Str) "hello")
          s)))))