/usr/lib/x86_64-linux-gnu/fis-gtm/V6.3-000A_x86_64/gtm_descript.h is in fis-gtm-6.3-000a 6.3-000A-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 | /****************************************************************
* *
* Copyright 2001, 2009 Fidelity Information Services, Inc *
* *
* This source code contains the intellectual property *
* of its copyright holder(s), and is made available *
* under a license. If you do not know the terms of *
* the license, please stop and do not read further. *
* *
****************************************************************/
#ifndef GTM_DESCRIPT_INCLUDED
#define GTM_DESCRIPT_INCLUDED
#include "gtm_sizeof.h"
int mumps_call();
typedef struct {
short len;
short type;
void *val;
} gtm_descriptor;
typedef struct {
unsigned int len;
unsigned int type;
void *val;
} gtm32_descriptor;
/* legal types */
#define DSC_K_DTYPE_T 1
#define GTM_ARRAY_OF_CHARS DSC_K_DTYPE_T
#define DSC_K_DTYPE_D 2
#define GTM_DOUBLE DSC_K_DTYPE_D
#define DSC_K_DTYPE_B 3
#define GTM_CHAR DSC_K_DTYPE_B
#define DSC_K_DTYPE_BU 4
#define GTM_UNSIGNED_CHAR DSC_K_DTYPE_BU
#define DSC_K_DTYPE_W 5
#define GTM_SHORT DSC_K_DTYPE_W
#define DSC_K_DTYPE_WU 6
#define GTM_UNSIGNED_SHORT DSC_K_DTYPE_WU
#define DSC_K_DTYPE_L 7
#define GTM_LONG DSC_K_DTYPE_L
#define DSC_K_DTYPE_LU 8
#define GTM_UNSIGNED_LONG DSC_K_DTYPE_LU
#define DSC_K_DTYPE_F 9
#define GTM_FLOAT DSC_K_DTYPE_F
#define GTM_MODE 10
#define GTM_DELIMITER 10
#define DESCRIPTOR(x,y) {x.type = GTM_ARRAY_OF_CHARS; x.len = SIZEOF(y) - 1; x.val = y;}
#define DESC_MODE(x,y) {x.type=GTM_MODE; x.len=SIZEOF(y); x.val=(void*)&y;}
#define DESC_CHAR(x,y) {x.type=GTM_ARRAY_OF_CHARS; x.len=SIZEOF(y)-1; x.val=y;}
#define DESC_ZERO(x) {x.type=0; x.len=0;}
#define DESC_LONG(x,y) {x.type=GTM_LONG; x.len=SIZEOF(y); x.val=&y;}
#define DESC_DELIM(x,y) {x.type=GTM_DELIMITER;x.len=SIZEOF(y);x.val=(void *)&y;}
#endif
|