phares3757/open-insight
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added sysprog entities

Browse Source
This commit is contained in:
Infineon\StieberD
2024-03-25 15:17:34 -07:00
parent 600a8e1f61
commit 3a6a2b6b5b
1028 changed files with 171660 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

99
SYSPROG/STPROCINS/RTI_GET_PROC_INFO_EQUATES.txt Normal file
View File

@ -0,0 +1,99 @@
compile insert rti_Get_Proc_Info_Equates
/*
** Copyright (C) 2013-2021 Revelation Software Inc. All Rights Reserved **
Author : Mr C
Date : Oct 2013
Purpose : Equates for use rti_Get_Proc_Info function
Comments
========
Amended Date Reason
======= ==== ======
Mr C 27 May 21 Added GPI_OESOURCEHASH$
Mr C 26 May 21 Added GPI_OENOLINEMARKS$
Mr C 17 Dec 20 Added GPI_OECOMPILEVER$
Mr C 11 Apr 15 Updated comments
Mr C 12 Feb 15 Added object code and literal pool size fields to retVal
*/
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
#ifndef _RTI_GET_PROC_INFO_EQUATES_
#define _RTI_GET_PROC_INFO_EQUATES_
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
declare function rti_Get_Proc_Info
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
// Returned info equates
//
// <1> Proc type
// <2> Argument count
// <3> Variable count
// <4> Expendable flag
// <5> DLL name
// <6> DLL exported function name
// <7> DLL Return Type
// <8> DLL Calling convention
// <9> DLL argument list type
// <10> OE DLL Internal pointer number
// <11> Basic+ Proc Type ( subroutine (1), function(2), routine(3) )
// <12> Compile User
// <13> Compile Time
// <14> ArgNames
// <15> ArgTypes
// <16> RowDef
// <17> Object Code Size
// <18> Literal Pool Size
// <19> Compiler Engine Version
// <20> Strip Linemarks flag
// <21> Source Hash
equ GPI_PROCTYPE$ to 1
equ GPI_ARGCOUNT$ to 2
equ GPI_VARCOUNT$ to 3
equ GPI_EXPENDABLEFLAG$ to 4
equ GPI_DLLNAME$ to 5
equ GPI_DLLFUNCTION$ to 6
equ GPI_DLLRETTYPE$ to 7
equ GPI_DLLCALLCONV$ to 8
equ GPI_DLLARGTYPES$ to 9
equ GPI_OECALLNO$ to 10
equ GPI_OEPROCTYPE$ to 11
equ GPI_OECOMPILEUSER$ to 12
equ GPI_OECOMPILETIME$ to 13
equ GPI_OEARGNAMES$ to 14 ; // @vm delimited
equ GPI_OEARGTYPES$ to 15 ; // @vm delimited
equ GPI_OEROWDEF$ to 16
equ GPI_OECODESEGSIZE$ to 17
equ GPI_OEDATASEGSIZE$ to 18
equ GPI_OECOMPILEVER$ to 19
equ GPI_OENOLINEMARKS$ to 20
equ GPI_OESOURCEHASH$ to 21
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
equ GPI_PROCTYPE_OE_SUB$ to 0 ; // Basic+ Subroutine/Function
equ GPI_PROCTYPE_OE_MAIN$ to 1 ; // Basic+ Main
equ GPI_PROCTYPE_DLL$ to 2 ; // DLL/OECall/ASM
equ GPI_PROCTYPE_OE_EXPEND$ to 3 ; // Basic+ Expendable
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
equ GPI_OEPROCTYPE_SUB$ to 1
equ GPI_OEPROCTYPE_FUNC$ to 2
equ GPI_OEPROCTYPE_ROUTINE$ to 3
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////
#endif
///////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////