#include <fortran.h>#include <liberrno.h>#include <stdlib.h>#include <stddef.h>#include <string.h>#include <cray/dopevec.h>
Go to the source code of this file.
Functions | |
| void | _TRIM (DopeVectorType *result, _fcd source) |
Variables | |
| long | _zero_entity |
| void _TRIM | ( | DopeVectorType * | result, | |
| _fcd | source | |||
| ) |
Definition at line 54 of file trim.c.
References _cptofcd(), _fcdlen(), _fcdtocp(), _LELVL_ABORT, _lerror(), _zero_entity, DopeVector::a, DopeVector::assoc, DopeVector::base_addr, DopeVector::charptr, FEINTUNK, FENOMEMY, NULL, DopeVector::orig_base, and DopeVector::orig_size.

| long _zero_entity |
1.7.1