emitIncrementByte x = do
  label <- aload 1
  iload 2
  dup2
  baload
  ldc x
  iadd
  i2b
  bastore
  returnM label
emitIncrementByte x = do
  label <- aload 1
  iload 2
  dup2
  baload
  ldc x
  iadd
  i2b
  bastore
  returnM label
emitIncrementByte x = do
  label <- aload 1
  iload 2
  dup2
  baload
  ldc x
  iadd
  i2b
  bastore
  returnM label