offsetToLabel :: Label -> InstrM Int
offsetToLabel label = do
  offset <- getOffset
  offsetToLabel' (Offset offset) label
offsetToLabel :: Label -> InstrM Int
offsetToLabel label = do
  offset <- getOffset
  offsetToLabel' (Offset offset) label
offsetToLabel label = do
  offset <- getOffset
  offsetToLabel' (Offset offset) label