prettyInstruction _ _ i@(SparseSwitchData{}) =
  "sparse-switch-data (" <> int32Dec (fromIntegral size) <> " units)"
    where size = insnUnitCount i
prettyInstruction _ _ i@(SparseSwitchData{}) =
  "sparse-switch-data (" <> int32Dec (fromIntegral size) <> " units)"
    where size = insnUnitCount i
prettyInstruction _ _ i@(SparseSwitchData{}) =
  "sparse-switch-data (" <> int32Dec (fromIntegral size) <> " units)"
    where size = insnUnitCount i