@@ -242,7 +242,7 @@ serialize_output_ops dc start_ptr in_fattr diffs ops = do
242 serialize_output_ops' ( y, out_ptr, fattr, False : diffs' ) _span_ops
242 serialize_output_ops' ( y, out_ptr, fattr, False : diffs' ) _span_ops
243 = return ( y + 1, out_ptr, fattr, diffs' )
243 = return ( y + 1, out_ptr, fattr, diffs' )
244 serialize_output_ops' (_y, _out_ptr, _fattr, [] ) _span_ops
244 serialize_output_ops' (_y, _out_ptr, _fattr, [] ) _span_ops
245− = error "shouldn't be possible"
245+ = error "vty - output spans without a corresponding diff."
247serialize_span_ops :: DisplayContext
247serialize_span_ops :: DisplayContext
@@ -345,4 +345,3 @@ limit_attr_for_display t attr
345 = let p :: Double = fromIntegral v / 240.0
345 = let p :: Double = fromIntegral v / 240.0
346 v' = floor $ p * (fromIntegral $ context_color_count t)
346 v' = floor $ p * (fromIntegral $ context_color_count t)
347 in SetTo $ Color240 v'
347 in SetTo $ Color240 v'