commit dbc8e2221b8ec883806d3631788e1aea219798ec parent 177a6513ed36a9fadbca1df44845e62dc5c3ff0d Author: Henry Wilson <m3henry@googlemail.com> Date: Sat, 17 Jun 2017 21:29:41 +0100 min, max Diffstat:
| M | main.s | | | 21 | +++++++++++++++++++++ |
1 file changed, 21 insertions(+), 0 deletions(-)
diff --git a/main.s b/main.s @@ -205,6 +205,27 @@ _dotdot: forthword do dot 1: endword +dup2: forthword + do over + do over + endword + +min: forthword + do dup2 + do less + if 1f + do swap +1: do drop + endword + +max: forthword + do dup2 + do greater + if 1f + do swap +1: do drop + endword + buff: .quad stack: .skip 1024 #1048576