diff options
Diffstat (limited to 'src/compiler/GFC.hs')
| -rw-r--r-- | src/compiler/GFC.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/compiler/GFC.hs b/src/compiler/GFC.hs index 61d5726b2..f75a39ab1 100644 --- a/src/compiler/GFC.hs +++ b/src/compiler/GFC.hs @@ -104,7 +104,7 @@ writeByteCode opts pgf where addrs = [(id,addr) | (id,(_,_,_,_,addr)) <- Map.toList (funs (abstract pgf))] ++ - [(id,addr) | (id,(_,_,addr)) <- Map.toList (cats (abstract pgf))] + [(id,addr) | (id,(_,_,_,addr)) <- Map.toList (cats (abstract pgf))] writePGF :: Options -> PGF -> IOE () writePGF opts pgf = do |