tex_types.h

浏览该文件的文档.

#pragma once
#ifndef INC_TEX_TYPES
#define INC_TEX_TYPES
#include <stdbool.h>
#include <stdint.h>
#include <stddef.h> // size_t
 
#ifdef _STDBOOL
// use <stdbool.h>
typedef bool Boolean; 
#else
// fallback
typedef unsigned char Boolean; 
#define true  1 
#define false 0 
#endif // _STDBOOL
 
 
/*
    Pascal data types
 
ref:
    - [Standard type - Lazarus wiki](https://wiki.freepascal.org/Standard_type)
    - [Integer (computer science) -
Wikipedia](https://en.wikipedia.org/wiki/Integer_(computer_science)#Common_integral_data_types)
 
Types:
    UChar(8), Char(8), SChar(8)
    Integer(64), UInteger(64), Pointer(64)
    Real(64)
*/
 
typedef double Real; 
 
#ifdef _STDINT
// use <stdint.h>
typedef uint8_t     UChar;      
typedef UChar       Char;       
typedef int8_t      SChar;      
 
typedef int64_t     Integer;    
typedef uint64_t    UInteger;   
typedef size_t      Pointer;    
 
typedef int16_t     Int16;  
typedef uint16_t    UInt16; 
#else
// fallback
typedef unsigned char   UChar;      
typedef UChar           Char;       
typedef signed char     SChar;      
 
typedef long long       Integer;    
typedef unsigned long long UInteger; 
typedef size_t          Pointer;    
 
typedef short           Int16;  
typedef unsigned short  UInt16; 
#endif // _STDINT
 
 
/*
    #18: Types in the outer block
 
Sections:
    18, 25, 38, 101, 109,
    113, 150, 212, 269, 300,
    [548], [594], 920, 925.
 
All types:
    #18: ASCIICode::UChar(8)
    #25: EightBits::UChar(8)
    #38: PackedASCIICode::UChar(8)
    #101 :Scaled::Integer(64)
    #101: NonNegativeInteger::UInteger(64)
    #101: SmallNumber::UChar(8)
    #109: GlueRatio::Real(64)
    #113: QuarterWord(8=>16)
    #113: HalfWord(16=>32)
    #113: TwoHalves(64)
    #113: FourQuarters(64)
    #113: MemoryWord(64)
    #150: GlueOrd(8)
    #212: ListStateRecord(366)
    #269: GroupCode(8)
    #300: InStateRecord(1344)
    #920: TriePointer::Pointer(64)
    #925: HyphPointer::Pointer(64)
 
*/
 
typedef UChar EightBits;        // end group S25x37_P13x18
 
typedef UChar PackedASCIICode; 
 
typedef Integer Scaled;
typedef UInteger NonNegativeInteger;
typedef UChar SmallNumber;
typedef Real GlueRatio;
 
 
// [p43#113]
// 这里类型的大小人为扩大了一倍
#ifdef _STDINT
// use <stdint.h>
typedef uint16_t QuarterWord; 
typedef uint32_t HalfWord;    
#else
// fallback
typedef unsigned short  QuarterWord;    
typedef unsigned int    HalfWord;       
#endif // _STDINT
 
// _NOT_USE_
#if false
typedef UChar TwoChoices;   
typedef UChar fourchoices;  
typedef char ManyChoices;   
#endif
 
typedef struct {
    HalfWord rh; 
    union {
        HalfWord lh; 
        struct {
            QuarterWord b0, b1; 
        } U2; 
    } UU; 
} TwoHalves; 
 
typedef struct {
    QuarterWord b0, b1, b2, b3; 
} FourQuarters; 
 
typedef union {
    Integer int_; 
    GlueRatio gr; 
    TwoHalves hh; 
    FourQuarters qqqq; 
    Integer sc; 
} MemoryWord; // end group S110x114_P42x43
 
 
typedef UChar GlueOrd;
 
typedef UChar GroupCode;
 
typedef Pointer TriePointer;
typedef Pointer HyphPointer;
 
#endif // INC_TEX_TYPES