/usr/include/kuip/kmacro.h is in libpacklib1-dev 20061220+dfsg3-2.
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 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 | /*
* $Id: kmacro.h,v 1.1.1.1 1996/03/08 15:33:00 mclareni Exp $
*
* $Log: kmacro.h,v $
* Revision 1.1.1.1 1996/03/08 15:33:00 mclareni
* Kuip
*
*/
/* kmacro.h: KUIP macros */
typedef enum {
APPLICATION_Statement,
ASSIGNMENT_Statement,
BREAKL_Statement,
CASE_Label,
CASE_Statement,
COMMAND_Statement,
DO_Statement,
ELSE_Statement,
ELSEIF_Statement,
ENDCASE_Statement,
ENDDO_Statement,
ENDFOR_Statement,
ENDIF_Statement,
ENDWHILE_Statement,
EOF_REACHED,
EXITM_Statement,
FOR_Statement,
GOTO_Label,
GOTO_Statement,
IF_GOTO_Statement,
IF_THEN_Statement,
MACRO_Statement,
NEXTL_Statement,
OFF_ERROR_Statement,
ON_ERROR_Statement,
ON_ERROR_CONTINUE,
ON_ERROR_EXITM,
ON_ERROR_GOTO,
ON_ERROR_STOPM,
READ_Statement,
REPEAT_Statement,
RETURN_Statement,
SHIFT_Statement,
STOPM_Statement,
UNTIL_Statement,
WHILE_Statement,
SYNTAX_ERROR
} KumacStatement;
typedef struct _KumacCode {
int (*op)();
char *arg[2];
} KumacCode;
typedef struct _KumacMacro {
char *name;
struct _KumacMacro *next;
int ncode;
KumacCode *code;
} KumacMacro;
typedef struct _KumacFile {
char *path;
int stamp;
KumacMacro *macros;
} KumacFile;
typedef struct _ExecStack {
KumacFile *file;
KumacMacro *macro;
char *argline;
char *line_number;
char *source_line;
HashTable *variables;
KumacStatement on_error_stmt;
char *on_error_arg;
KumacStatement off_error_stmt;
char *off_error_arg;
int pc;
int status;
} ExecStack;
typedef struct _NestStack {
KumacStatement stmt;
char *var;
char tmp1[16];
char tmp2[16];
char label1[16];
char label2[16];
char label3[16];
} NestStack;
extern void store_variable( ExecStack*, const char* name, const char* value );
|