mmode.h

浏览该文件的文档.

#pragma once
#ifndef INC_MMODE_H
#define INC_MMODE_H
#include "global.h"
#include "charset.h" // [type] ASCIICode
#include "fonts.h"
#include "scan.h" // MAX_DIMEN
#include "box.h"  // [enum] UNSET_NODE
#include "tex_constant.h" // [const] MEM_MIN, EMPTY, MIN_QUARTER_WORD
 
enum NoadType {
    ordnoad = (UNSET_NODE + 3),
 
    // [#682]
    opnoad,    
    binnoad,   
    relnoad,   
    opennoad,  
    closenoad, 
    punctnoad, 
    innernoad, 
 
    // [#683]
    radicalnoad,  
    fractionnoad, 
 
    // [#687]
    undernoad,   
    overnoad,    
    accentnoad,  
    vcenternoad, 
    leftnoad,    
    rightnoad,   
}; // [#682] enum NoadType
 
#define limits   1
#define nolimits 2
 
#define noadsize            (4 * CHAR_NODE_SIZE)
#define radicalnoadsize     (5 * CHAR_NODE_SIZE)
#define fractionnoadsize    (6 * CHAR_NODE_SIZE)
#define accentnoadsize      (5 * CHAR_NODE_SIZE)
 
#define stylenode (UNSET_NODE + 1)
#define stylenodesize 3
 
enum StyleNodeSubtype {
    displaystyle = 0,      
    textstyle = 2,         
    scriptstyle = 4,       
    scriptscriptstyle = 6, 
}; // [#688] StyleNodeSubtype
 
#define cramped 1
#define choicenode (UNSET_NODE + 2)
 
 
 
#if 1
#define nucleus(x)  ((x)+CHAR_NODE_SIZE) /* the |nucleus| field of a noad}*/
#define supscr(x)  (nucleus(x)+CHAR_NODE_SIZE) /* the |supscr| field of a noad}*/
#define subscr(x)  (supscr(x)+CHAR_NODE_SIZE) /* the |subscr| field of a noad}*/
#define leftdelimiter(x)  (subscr(x)+CHAR_NODE_SIZE) /* first delimiter field of a noad}*/
#define rightdelimiter(x)  (leftdelimiter(x)+CHAR_NODE_SIZE) /* second delimiter field of a fraction noad}*/
#define accentchr(x)  (subscr(x)+CHAR_NODE_SIZE) /* the |accentchr| field of an accent noad}*/
#else
#define nucleus(x)  ((x)+1) /* the |nucleus| field of a noad}*/
#define supscr(x)  ((x)+2) /* the |supscr| field of a noad}*/
#define subscr(x)  ((x)+7) /* the |subscr| field of a noad}*/
#define leftdelimiter(x)  ((x)+4) /* first delimiter field of a noad}*/
#define rightdelimiter(x)  ((x)+5) /* second delimiter field of a fraction noad}*/
#define accentchr(x)  ((x)+4) /* the |accentchr| field of an accent noad}*/
#endif
 
#define mathtype  link
#define fam(x)  type(x)
#define smallfam(x)     mem[x].qqqq.b0 /* |fam| for ``small'' delimiter}*/
#define smallchar(x)    mem[x].qqqq.b1 /* |character| for ``small'' delimiter}*/
#define largefam(x)     mem[x].qqqq.b2 /* |fam| for ``large'' delimiter}*/
#define largechar(x)    mem[x].qqqq.b3 /* |character| for ``large'' delimiter}*/
#define thickness(x)   (mem[nucleus(x)-MEM_MIN].sc) /* |thickness| field in a fraction noad}*/
#define defaultcode     1073741824L // denotes default_rule_thickness
#define numerator       supscr /* |numerator| field in a fraction noad}*/
#define denominator     subscr /* |denominator| field in a fraction noad}*/
#define delimiter       nucleus /* |delimiter| field in left and right noads}*/
#define scriptsallowed(x)  ((type(x)>=ordnoad)&&(type(x)<leftnoad))
#define vpack(x, y, z)  vpackage((x), (y), (z), MAX_DIMEN)
#define displaymlist(x)     info(x+1) /* mlist to be used in display style}*/
#define textmlist(x)        link(x+1) /* mlist to be used in text style}*/
#define scriptmlist(x)      info(x+2) /* mlist to be used in script style}*/
#define scriptscriptmlist(x)    link(x+2) /* mlist to be used in scriptscript style}*/ // end group S680x698_P249x257
// enum FontSizeCode {};
// size code for the largest size in a family
#define TEXT_SIZE           0
// size code for the medium size in a family
#define SCRIPT_SIZE         16
// size code for the smallest size in a family
#define SCRIPT_SCRIPT_SIZE  32
 
// [p258#700]
#define totalmathsyparams  22
// [p258#701]
#define totalmathexparams  13
 
#define mathsy(x, y) (fontinfo[(x) + parambase[fam_fnt(2 + (y))]].sc)
#define mathxheight(x) mathsy(5, x) /* height of `\.x'}*/
#define mathquad(x) mathsy(6, x)    /* \.{18mu}}*/
#define num1(x)  mathsy(8,x) /* numerator shift-up in display styles}*/
#define num2(x)  mathsy(9,x) /* numerator shift-up in non-display, non-\.{\\atop}}*/
#define num3(x)  mathsy(10,x) /* numerator shift-up in non-display \.{\\atop}}*/
#define denom1(x)  mathsy(11,x) /* denominator shift-down in display styles}*/
#define denom2(x)  mathsy(12,x) /* denominator shift-down in non-display styles}*/
#define sup1(x)  mathsy(13,x) /* superscript shift-up in uncramped display style}*/
#define sup2(x)  mathsy(14,x) /* superscript shift-up in uncramped non-display}*/
#define sup3(x)  mathsy(15,x) /* superscript shift-up in cramped styles}*/
#define sub1(x)  mathsy(16,x) /* subscript shift-down if superscript is absent}*/
#define sub2(x)  mathsy(17,x) /* subscript shift-down if superscript is present}*/
#define supdrop(x)  mathsy(18,x) /* superscript baseline below top of large box}*/
#define subdrop(x)  mathsy(19,x) /* subscript baseline below bottom of large box}*/
#define delim1(x)  mathsy(20,x) /* size of \.{\\atopwithdelims} delimiters*/
/* in display styles}*/
#define delim2(x)  mathsy(21,x) /* size of \.{\\atopwithdelims} delimiters in non-displays}*/
#define axisheight(x)  mathsy(22,x) /* height of fraction lines above the baseline}*/
 
#define mathex(x) fontinfo[x + parambase[fam_fnt(3 + cursize)]].sc
#define defaultrulethickness  mathex(8) /* thickness of \.{\\over} bars}*/
#define bigopspacing1  mathex(9) /* minimum clearance above a displayed op}*/
#define bigopspacing2  mathex(10) /* minimum clearance below a displayed op}*/
#define bigopspacing3  mathex(11) /* minimum baselineskip above displayed op}*/
#define bigopspacing4  mathex(12) /* minimum baselineskip below displayed op}*/
#define bigopspacing5  mathex(13) /* padding above and below displayed limits}*/
 
#define crampedstyle(x)  2*(x / 2)+cramped /* cramp the style}*/
#define substyle(x)  2*(x / 4)+scriptstyle+cramped /* smaller and cramped}*/
#define supstyle(x)  2*(x / 4)+scriptstyle+(x % 2) /* smaller}*/
#define numstyle(x)  x+2-2*(x / 6) /* smaller unless already script-script}*/
#define denomstyle(x)  2*(x / 2)+cramped+2-2*(x / 6) /* smaller, cramped}*/ // end group S699x718_P258x264
#define newhlist(x)         mem[nucleus(x)].int_
// #define donewithnoad        80
// #define donewithnode        81
// #define checkdimensions     82
// #define deleteq             83 // end group S719x767_P265x284
 
extern TwoHalves emptyfield;
extern FourQuarters nulldelimiter;
 
extern Pointer curmlist;
extern SmallNumber curstyle, cursize;
extern Boolean mlistpenalties;
extern InternalFontNumber curf;
extern QuarterWord curc;
extern FourQuarters curi;
 
extern void mmode_init();
extern void print_size(Integer s);
extern HalfWord newnoad(void);
extern HalfWord newstyle(SmallNumber s);
extern HalfWord newchoice(void);
extern void printfamandchar(HalfWord p);
extern void printdelimiter(HalfWord p);
extern void printsubsidiarydata(HalfWord p, ASCIICode c);
extern void showinfo(void);
extern void printstyle(Integer c);
 
extern HalfWord fractionrule(long t);
extern HalfWord overbar(HalfWord b, long k, long t);
extern HalfWord charbox(InternalFontNumber f, QuarterWord c);
extern void stackintobox(HalfWord b, InternalFontNumber f, QuarterWord c);
extern Integer heightplusdepth(InternalFontNumber f, QuarterWord c);
extern HalfWord vardelimiter(HalfWord d, SmallNumber s, long v);
extern HalfWord rebox(HalfWord b, long w);
extern HalfWord mathglue(HalfWord g, long m);
extern void mathkern(HalfWord p, long m);
extern void flushmath(void);
 
// math formula
extern void mlisttohlist(void);
 
#endif /* INC_MMODE_H */