getSize :: Option -> GnuSize
getSize opt = case value opt of
  (GnuSizeOpt x) -> x
  _ -> GnuSize NoPrefix 0 NoUnits
getSize :: Option -> GnuSize
getSize opt = case value opt of
  (GnuSizeOpt x) -> x
  _ -> GnuSize NoPrefix 0 NoUnits
getSize opt = case value opt of
  (GnuSizeOpt x) -> x
  _ -> GnuSize NoPrefix 0 NoUnits