blob: 884cf71666b265bbab4bb7f4b32e6b90ae19417c (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
|
# TCS.H --Descriptor for a table column array selector
define MAXDIM 7 # max dimensions in table array
define TCS_COLUMN Memi[$1] # table column pointer
define TCS_DIMEN Memi[$1+1] # dimensionality of array,
# zero for scalars
define TCS_FIRST Memi[3*($2)+$1-1] # first value in array
define TCS_LAST Memi[3*($2)+$1] # last value in array
define TCS_INC Memi[3*($2)+$1+1] # increment between values
define TCS_LENGTH (3*($1)+2)
|
