#!/usr/bin/env tclsh

source tclasm_old.tcl

### store 2 values to memory, load them back, add them and store the result

set_sp h7FFFC
const 12345678
store@ h1EEE0
const 40302010
store@ h1EEE4

load@ h1EEE0
stack down
load@ h1EEE4
# adding 40302010 to 12345678 should yield 52647688
add
stack up
store@ h1EEE8
halt