From 75098baa04f129944fb6d4fc2b4b4e863d49410b Mon Sep 17 00:00:00 2001 From: Aaron Taylor Date: Wed, 31 Jul 2019 21:48:15 -0700 Subject: [PATCH] Removed `isnegative` subroutine from stdlib. --- stdlib/README.md | 2 +- stdlib/math.pvvs | 18 ------------------ 2 files changed, 1 insertion(+), 19 deletions(-) diff --git a/stdlib/README.md b/stdlib/README.md index f077799..9e1338f 100644 --- a/stdlib/README.md +++ b/stdlib/README.md @@ -69,7 +69,7 @@ header comment for each function to learn the call and return stack. 111100 ----- print string (debug.pvvs) 1xxxxxx - reserved for less common entry points 1000000 ----- lowbitand (logic.pvvs) - 1000001 ----- isnegative (math.pvvs) + 1000001 ----- 1000010 ----- print sign of number (stdio.pvvs) 1000011 ----- print magnitude of number (stdio.pvvs) 1000100 ----- print string from stack (stdio.pvvs) diff --git a/stdlib/math.pvvs b/stdlib/math.pvvs index 7bd73e5..d618d83 100644 --- a/stdlib/math.pvvs +++ b/stdlib/math.pvvs @@ -55,22 +55,4 @@ TSSN | MULTIPLY NSSVSSSTSSSTSSSSSSSTN | Mark: 00010001 00000001 NTN | RTS -@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ -@ Name: -@ isnegative (1000001) -@ Description: -@ Returns 1 if 'number' is negative, 0 if positive. -@ Call Stack: -@ number <-- TOS -@ Return Stack: -@ 1 or 0 <-- TOS -@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ -NSSVTSSSSSTN | Mark: 1000001 (isnegative) -NTTSTSSSSSTSSSSSSSSN | BMI > 01000001 00000000 -SSSSN | PUSH 0 -NTN | RTS -NSSVSTSSSSSTSSSSSSSSN | Mark: 01000001 00000000 -SSSTN | PUSH 1 -NTN | RTS - #endif -- 2.20.1