(For i [{[DQ [VarSub @]]}])
  (Case to_match={[VarSub i]}, pat_word_list=[[{[LIT_CHARS -L] [LIT_OTHER "*"]}]]
    (Com {[LIT_CHARS printf]} {[SQ <LIT_CHARS "\"%s\"\\n">]} {[DQ [VarSub i transform_ops=[VS_UNARY_POUND {[LIT_CHARS -L]}]]]})
  )
)