mirror of
https://github.com/QB64Official/qb64.git
synced 2024-09-04 11:10:15 +00:00
b9a52e9600
This way, we only include that code if its commands are called upon.
In order to do this, some other areas had to be changed as well:
- There is now a libqb.h file, which declares some routines in libqb.cpp,
in order to allow them to be called from a separately compiled unit, i.e,
the user mods part.
- common.cpp now has an #include guard, just to be on the safe side.
- The library purge routines know about the new part.
- qb64.bas is modified to handle the new part; this area is just modeled
off the code for the other parts.
- Appropriate flags were set in the hash table entires for the commands.
- The user mods, now being a separate compilation unit, #include common.cpp
and libqb.h. The former is required for important type declarations and
access to glut commmands, the latter for access to libqb routines.
- qbx.cpp #includes the src.cpp file in the user mods part, which declares the
routines.
Something to ponder: libqb does not include or rely on any of the user mod routines,
so it's probably not necessary to rebuild it like with the other parts. That exploration
is for another day, however.
229 lines
5 KiB
QBasic
229 lines
5 KiB
QBasic
clearid
|
|
id.n = "_D2R"
|
|
id.subfunc = 1
|
|
id.callname = "func_deg2rad"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_D2G"
|
|
id.subfunc = 1
|
|
id.callname = "func_deg2grad"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_R2D"
|
|
id.subfunc = 1
|
|
id.callname = "func_rad2deg"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_R2G"
|
|
id.subfunc = 1
|
|
id.callname = "func_rad2grad"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_G2D"
|
|
id.subfunc = 1
|
|
id.callname = "func_grad2deg"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_G2R"
|
|
id.subfunc = 1
|
|
id.callname = "func_grad2rad"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid 'Clear the old id info so we set the slate for a new one
|
|
id.n = "_ATAN2" 'The name of our new one
|
|
id.subfunc = 1 'And this is a function
|
|
id.callname = "atan2" 'The C name of the function
|
|
id.args = 2 'It takes 2 parameters to work
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) 'These simply add up to represent the 2 patameters from what I can tell
|
|
id.ret = FLOATTYPE - ISPOINTER 'we want it to return to us a nice _FLOAT value
|
|
regid 'and we're finished with ID registration
|
|
|
|
clearid 'Clear the old id info so we set the slate for a new one
|
|
id.n = "_HYPOT" 'The name of our new one
|
|
id.subfunc = 1 'And this is a function
|
|
id.callname = "hypot" 'The C name of the function
|
|
id.args = 2 'It takes 2 parameters to work
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER) + MKL$(FLOATTYPE - ISPOINTER) 'These simply add up to represent the 2 patameters from what I can tell
|
|
id.ret = FLOATTYPE - ISPOINTER 'we want it to return to us a nice _FLOAT value
|
|
regid 'and we're finished with ID registration
|
|
|
|
clearid
|
|
id.n = "_ASIN"
|
|
id.subfunc = 1
|
|
id.callname = "asin"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_ACOS"
|
|
id.subfunc = 1
|
|
id.callname = "acos"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_SINH"
|
|
id.subfunc = 1
|
|
id.callname = "sinh"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_COSH"
|
|
id.subfunc = 1
|
|
id.callname = "cosh"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_TANH"
|
|
id.subfunc = 1
|
|
id.callname = "tanh"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_ASINH"
|
|
id.subfunc = 1
|
|
id.callname = "asinh"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_ACOSH"
|
|
id.subfunc = 1
|
|
id.callname = "acosh"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_ATANH"
|
|
id.subfunc = 1
|
|
id.callname = "atanh"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_CEIL"
|
|
id.subfunc = 1
|
|
id.callname = "ceil"
|
|
id.args = 1
|
|
id.arg = MKL$(FLOATTYPE - ISPOINTER)
|
|
id.ret = FLOATTYPE - ISPOINTER
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_PI"
|
|
id.subfunc = 1
|
|
id.callname = "func_pi"
|
|
id.args = 0
|
|
id.ret = DOUBLETYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_DESKTOPHEIGHT"
|
|
id.subfunc = 1
|
|
id.callname = "func_screenheight"
|
|
id.args = 0
|
|
id.ret = LONGTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_DESKTOPWIDTH"
|
|
id.subfunc = 1
|
|
id.callname = "func_screenwidth"
|
|
id.args = 0
|
|
id.ret = LONGTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_SCREENICON" 'name change to from _ICONIFYWINDOW to _SCREENICON to match the screenshow and screenhide
|
|
id.subfunc = 2
|
|
id.callname = "sub_screenicon"
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_SCREENEXISTS"
|
|
id.subfunc = 1
|
|
id.callname = "func_windowexists"
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_CONTROLCHR"
|
|
id.subfunc = 1
|
|
id.callname = "func__controlchr"
|
|
id.args = 0
|
|
id.ret = LONGTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_STRICMP"
|
|
id.subfunc = 1
|
|
id.callname = "func__str_nc_compare"
|
|
id.args = 2
|
|
id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER)
|
|
id.ret = LONGTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|
|
clearid
|
|
id.n = "_STRCMP"
|
|
id.subfunc = 1
|
|
id.callname = "func__str_compare"
|
|
id.args = 2
|
|
id.arg = MKL$(STRINGTYPE - ISPOINTER) + MKL$(STRINGTYPE - ISPOINTER)
|
|
id.ret = LONGTYPE - ISPOINTER
|
|
id.Dependency = DEPENDENCY_USER_MODS
|
|
regid
|
|
|