Remove debugging code.
This commit is contained in:
parent
5002b73238
commit
882d0c002a
|
@ -155,7 +155,6 @@ cgenTopLevel s
|
|||
sequence_ $ map (call genForwardDeclaration)
|
||||
(listify (const True :: A.Specification -> Bool) s)
|
||||
|
||||
tell ["/* ", show $ csParProcs cs, " */\n"]
|
||||
sequence_ [do tell ["extern int " ++ nameString n ++ "_wrapper_stack_size;\n"]
|
||||
cgenProcWrapper n
|
||||
| n <- tlpName : (Set.toList $ csParProcs cs)]
|
||||
|
|
Loading…
Reference in New Issue
Block a user