class SyntaxTree::YARV::Bf

def input_char(iseq)
  iseq.getglobal(:$tape)
  iseq.getglobal(:$cursor)
  iseq.getglobal(:$stdin)
  iseq.send(YARV.calldata(:getc))
  iseq.send(YARV.calldata(:ord))
  iseq.send(YARV.calldata(:[]=, 2))
  iseq.pop
end