From: Dan White Date: Mon, 13 May 2013 17:04:19 +0000 (-0500) Subject: msp4th: overFunc is simple enough X-Git-Tag: cheetah~81 X-Git-Url: http://git.whiteaudio.com/gitweb/?a=commitdiff_plain;h=8eb03c20af60c76f21174e4d35bf08292828b2ac;p=430.git msp4th: overFunc is simple enough --- diff --git a/msp4th/msp4th.c b/msp4th/msp4th.c index 688e811..69fda0d 100644 --- a/msp4th/msp4th.c +++ b/msp4th/msp4th.c @@ -371,7 +371,6 @@ void ifFunc(int16_t x); void loopFunc(int16_t n); void rollFunc(int16_t n); void pushnFunc(void); -void overFunc(void); void dfnFunc(void); void printNumber(int16_t n); void printHexChar(int16_t n); @@ -886,12 +885,6 @@ void pushnFunc(void) } -void overFunc(void) -{ - pushMathStack(NOS); -} - - void dfnFunc(void) { // this function adds a new def to the list and creates a new opcode @@ -1200,7 +1193,7 @@ void execN(int16_t opcode) break; case 36: // over ( a b -- a b a ) - overFunc(); + pushMathStack(NOS); break; case 37: // push1 ( -- 1 )