From 036385e20a18314c74ffa5e20f95df520bf2a06b Mon Sep 17 00:00:00 2001 From: QB64Cobalt <56514693+QB64Cobalt@users.noreply.github.com> Date: Sat, 16 Nov 2019 16:21:51 -0800 Subject: [PATCH] Update subs_functions.bas --- source/subs_functions/subs_functions.bas | 36 ++++++++++++++++++++++++ 1 file changed, 36 insertions(+) diff --git a/source/subs_functions/subs_functions.bas b/source/subs_functions/subs_functions.bas index 895cd07ec..015979061 100644 --- a/source/subs_functions/subs_functions.bas +++ b/source/subs_functions/subs_functions.bas @@ -3407,3 +3407,39 @@ id.callname = "func__getconsoleinput" id.args = 0 id.ret = LONGTYPE - ISPOINTER regid + +clearid +id.n = "_READBIT" +id.subfunc = 1 +id.callname = "func__readbit" +id.args = 2 +id.arg = MKL$(INTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) +id.ret = INTEGER64TYPE - ISPOINTER +regid + +clearid +id.n = "_SETBIT" +id.subfunc = 1 +id.callname = "func__setbit" +id.args = 2 +id.arg = MKL$(INTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) +id.ret = INTEGER64TYPE - ISPOINTER +regid + +clearid +id.n = "_RESETBIT" +id.subfunc = 1 +id.callname = "func__resetbit" +id.args = 2 +id.arg = MKL$(INTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) +id.ret = INTEGER64TYPE - ISPOINTER +regid + +clearid +id.n = "_TOGGLEBIT" +id.subfunc = 1 +id.callname = "func__togglebit" +id.args = 2 +id.arg = MKL$(INTEGER64TYPE - ISPOINTER) + MKL$(LONGTYPE - ISPOINTER) +id.ret = INTEGER64TYPE - ISPOINTER +regid