nfields X recname X recnum X
1: /* 2: * Alternate uses for procedure block fields, applied to records. 3: */ 4: #define nfields nparam /* number of fields */ 5: #define recnum nstatic /* record number */ 6: #define recname pname /* record name */