Fix a small bug in the type pretty-printer

[paf31]

Another little bug I noticed while working on functional dependencies.

Previously:

forall m.
  (MonadState { x :: Int m
              }
  ) => m Unit

Now:

forall m.     
  (MonadState  
     { x :: Int
     }         
     m        
  ) => m Unit 

[rvion]

are those one fixed too: ?

(let           ."b"
   o = { a: ...
       }
 in o
)

(from #2039)

> import GM.Scene
> :t instance_create
forall a m.
  (MonadState { elems :: Array                                 m) => { x :: Number
                           (Maybe                                    , y :: Number
                              { obj :: { x :: Number                 , vx :: Number
                                       , y :: Number                 , vy :: Number
                                       , vx :: Number                , mask :: { x :: Number
                                       , vy :: Number                          , y :: Number
                                       , mask :: { x :: Number                 , w :: Number
                                                 , y :: Number                 , h :: Number
                                                 , w :: Number                 }
                                                 , h :: Number       , obj :: a
                                                 }                   }
                                       , obj :: a                    -> m Unit
                                       }
                              , uid :: Int
                              }
                           )
              , next_uid :: Int
              }

from nwolverson/atom-ide-purescript#112

[paf31]

Yes I think so.