mkInsn :: PP.Doc -> [PP.Doc] -> PP.Doc
mkInsn name args = name <+> M.mconcat (PP.punctuate ", " args)
mkInsn :: PP.Doc -> [PP.Doc] -> PP.Doc
mkInsn name args = name <+> M.mconcat (PP.punctuate ", " args)
mkInsn name args = name <+> M.mconcat (PP.punctuate ", " args)