1: /*
2: * Interpress utilities
3: *
4: * Copyright (c) 1984, 1985 Xerox Corp.
5: *
6: * Written for Xerox Corporation by William LeFebvre
7: * 30-May-1984
8: *
9: */
10:
11: /*
12: * Subroutines to help build interpress files:
13: *
14: * literal interface level - these routines produce interpress output at
15: * the token level.
16: */
17:
18: /*
19: * This file contains the macro definitions for some of the literal
20: * operations. This is done for efficiency reasons.
21: */
22:
23: # define append_short_number(number) \
24: append_word((unsigned short)(number + INTEGER_ZERO))
25:
26: # define AppendIdentifier(string) \
27: append_Sequence(sequenceIdentifier, strlen(string), (unsigned char *)string)
28:
29: # define AppendString(string) \
30: append_Sequence(sequenceString, strlen(string), (unsigned char *)string)
31:
32: # define (string) \
33: append_Sequence(sequenceComment, strlen(string), (unsigned char *)string)
34:
35: # define AppendInsertFile(string) \
36: append_Sequence(sequenceInsertFile, strlen(string), (unsigned char *)string)
37:
38: /* An abbreviation for AppendOp: */
39:
40: #ifndef lint
41: # define Op(string) AppendOp((unsigned)OP_/**/string)
42: #else
43: # define Op(string) AppendOp(1) /* is this the right thing? */
44: #endif
Defined macros
defined in line
32;
never used
Op
defined in line
43;
never used