n4_asm.h

Go to the documentation of this file.

 
#ifndef __SRC_N4_ASM_H
#define __SRC_N4_ASM_H
#include "n4.h"
#define N4_DOES_META  1 
#define N4_USE_GOTO   1 
enum N4OP {
    TKN_IMM = 0,     
    TKN_WRD,         
    TKN_PRM,         
    TKN_NUM,         
    TKN_EXT,         
    TKN_ERR          
};
constexpr U8  CTL_BITS = 0xc0;   
constexpr U8  JMP_OPS  = 0xc0;   
constexpr U8  PRM_OPS  = 0x80;   
constexpr U8  JMP_MASK = 0xf0;   
constexpr U8  PRM_MASK = 0x3f;   
constexpr IU  ADR_MASK = 0x0fff; 
constexpr U8  OP_CALL  = 0xc0;   
constexpr U8  OP_CDJ   = 0xd0;   
constexpr U8  OP_UDJ   = 0xe0;   
constexpr U8  OP_NXT   = 0xf0;   
enum N4_EXT_OP {                 
    I_NOP  = 0,                  
    I_SEM  = 10,                 
    I_DQ   = 31,                 
    I_SQ   = 32,                 
    I_DO   = 55,                 
    I_I    = 61,                 
    I_FOR  = 62,                 
    I_LIT  = 63                  
};
constexpr IU LFA_END = 0xffff;   
#define XT(a)  ((a) + sizeof(IU) + 3) 
namespace N4Asm                     // (10-byte header)
{
    extern U8  *last;               
    extern U8  *here;               
 
    // EEPROM persistence I/O
    void save(U8 autorun=0);        
    IU   load(U8 autorun=0);        
 
    IU   reset();                   
 
    N4OP parse(
        U8  *tkn,                   
        IU  *rst,                   
        U8  run                     
        );
    void compile(
        IU *rp0                     
        );
    void variable();                
    void constant(DU v);            
    void create();                  
    void comma(DU v);               
    void ccomma(DU v);              
    void does(IU xt);               
    void dot_str();
    IU  query();                    
    void words();                   
    void forget();                  
    void see();                     
 
    U16 trace(
        IU   adr,                   
        U8   ir,                    
        char delim=0                
        );
};  // namespace N4Asm
 
#endif //__SRC_N4_ASM_H