saphir/Saphir/Class.HC

class SaphirAttr {
    I64 fg;
    I64 bg;
};

class SaphirBorder : SaphirAttr {
    I64 focus_fg;
    I64 focus_bg;
    Bool list;
};

class SaphirCursor : SaphirAttr {
    // Bool blink;
    U64 stub;
};

class SaphirKeyDev {
    U64 sys_cbs;
    U64 null_cbs;
}

class SaphirGlbls {
    Bool enabled;
    Bool blink;
    SaphirBorder border;
    SaphirCursor cursor;
    SaphirAttr status;
    SaphirKeyDev kd;
    I64 doc_cursor_state;
} saphir;
MemSet(&saphir, 0, sizeof(SaphirGlbls));