Bad formatting of class signatures

[Julow]

class c :
  'a
  -> object
       val x : 'b
     end

The object part that comes last should be docked. The arguments can then fit on the first line.

Desired output:

class c : 'a -> object
    val x : 'b
  end