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
///////////////////////////////////////////////////////////////////////////////   
///////////////////////////////////////////////////////////////////////////////