Inline comment to a record constructor leads to non idempotent behavior

Initial formatting
```hs
data Foo
  = Foo { foo :: Int } -- ^ foo
  | Bar
```
after the first run
```hs
data Foo
  = Foo
  { foo :: Int
  } -- ^ foo
  | Bar
```
after the second run
```hs
data Foo
  = Foo
  { foo :: Int
  }
  -- ^ foo
  | Bar
```
It was discovered by me at the same time as #425, but I think that this is another issue