#!/usr/bin/env tclsh

source tclasm_old.tcl

set_sp h7FFFC
const h00AD00DE
stack down
const h00EF00BE
swap
## Because values were swapped, h00AD00DE should get written, first, at lower
## address (h100) and h00EF00BE should be written next (at h104)
store@ h00100
stack down
store@ h00104
halt