All pastes #389482 Raw Edit

Stuff

public text v1 · immutable
·published 2007-03-10 19:21 UTC
rendered paste body
Main> run "ss+~~+k~~"
X29AState {register = 0, stack = [Apply (Apply PrimS (Apply PrimS PrimInc)) (Apply PrimInc PrimK)]}

Main> run "ss+~~+k~~k~"
X29AState {register = 2, stack = [PrimK]}