toSig :: [S.Expr] -> [(AST.Type, AST.Name)]
toSig = map (\varDef -> (varDefType varDef, AST.Name (varDefName varDef)))
toSig :: [S.Expr] -> [(AST.Type, AST.Name)]
toSig = map (\varDef -> (varDefType varDef, AST.Name (varDefName varDef)))
toSig = map (\varDef -> (varDefType varDef, AST.Name (varDefName varDef)))