module Language.GLSL.Optimizer.FunctionGenerator where import Language.GLSL.AST makeFunction :: [StmtAnnot a] -> TopDecl a makeFunction :: [StmtAnnot a] -> TopDecl a makeFunction [StmtAnnot a] _ = ProcName -> [ParamDecl] -> [StmtAnnot a] -> TopDecl a forall a. ProcName -> [ParamDecl] -> [StmtAnnot a] -> TopDecl a ProcDecl ProcName ProcMain [] []