| definition: |
showCurryModule :: Prog -> String
showCurryModule (Prog mod imports types funcs ops) = unlines $
["module " ++ mod ++ "(" ++ showTypeExports types ++
showFuncExports funcs ++ ") where\n"] ++
concatMap showInterfaceImport imports ++ [""] ++
map showInterfaceOpDecl ops ++
(if null ops then [] else [""]) ++
map (showCurryDataDecl (showQNameInModule mod)) types
++ [""] ++
map (showCurryFuncDecl (showQNameInModule mod)
(showQNameInModule mod)) funcs
|
| demand: |
argument 1 |
| deterministic: |
deterministic operation |
| failfree: |
<FAILING> |
| indeterministic: |
referentially transparent operation |
| infix: |
no fixity defined |
| iotype: |
{({Prog}) |-> _}
|
| name: |
showCurryModule |
| precedence: |
no precedence defined |
| result-values: |
_ |
| signature: |
FlatCurry.Types.Prog -> String |
| solution-complete: |
operation might suspend on free variables |
| terminating: |
possibly non-terminating |
| totally-defined: |
possibly non-reducible on same data term |