expand.h

浏览该文件的文档.

#pragma once
#ifndef INC_EXPAND_H
#define INC_EXPAND_H
#include <stdio.h> // FILE
#include "global.h"
 
#define STORE_NEW_TOKEN(p, x) \
    do {                      \
        int q = get_avail();  \
        link(p) = q;          \
        info(q) = (x);        \
        p = q;                \
    } while (0)
// end #define STORE_NEW_TOKEN(p, x)
 
#define FAST_STORE_NEW_TOKEN(p, x) \
    do {                           \
        int q;                     \
        FAST_GET_AVAIL(q);         \
        link(p) = q;               \
        info(q) = (x);             \
        p = q;                     \
    } while (0)
// end #define FAST_STORE_NEW_TOKEN(p, x)
#define topmarkcode         0
#define firstmarkcode       1
#define botmarkcode         2
#define splitfirstmarkcode  3
#define splitbotmarkcode    4
#define topmark             curmark[topmarkcode - topmarkcode]
#define firstmark           curmark[firstmarkcode - topmarkcode]
#define botmark             curmark[botmarkcode - topmarkcode]
#define splitfirstmark      curmark[splitfirstmarkcode - topmarkcode]
#define splitbotmark        curmark[splitbotmarkcode - topmarkcode]
// [p179#480]
#define closed          2
#define justopen        1
enum ConditionPrimitives {
    IF_CHAR_CODE,  
    IF_CAT_CODE,   
    IF_INT_CODE,   
    IF_DIM_CODE,   
    IF_ODD_CODE,   
    IF_VMODE_CODE, 
    IF_HMODE_CODE, 
    IF_MMODE_CODE, 
    IF_INNER_CODE, 
    IF_VOID_CODE,  
    IF_HBOX_CODE,  
    IF_VBOX_CODE,  
    IF_X_CODE,     
    IF_EOF_CODE,   
    IF_TRUE_CODE,  
    IF_FALSE_CODE, 
    IF_CASE_CODE   
}; // [p181#487]: enum ConditionPrimitives
 
#define ifnodesize 2
 
enum IfCode {
    ifcode = 1, 
    ficode,     
    elsecode,   
    orcode,     
}; // [#489] enum IfCode
 
#define iflinefield(x)  mem[x + 1].int_ // end group S487x510_P181x187
 
extern FILE* readfile[16];
extern char readopen[17];
 
extern Pointer condptr;
// init only
extern UChar iflimit;
// init + final cleanup
extern SmallNumber curif;
extern Integer ifline;
// lexer
extern Integer skipline;
extern char longstate;
extern Pointer curmark[splitbotmarkcode - topmarkcode + 1];
 
extern HalfWord thetoks(void);
extern HalfWord scantoks(Boolean macrodef, Boolean xpand);
extern void readtoks(long n, HalfWord r);
extern void expand_init();
extern void build_token_init();
extern void cond_process_init();
extern void expand(void);
extern void get_x_token(void);
extern void xtoken(void);
 
 
#endif // INC_EXPAND_H