eforth_core.h

Go to the documentation of this file.

 
#ifndef __EFORTH_CORE_H
#define __EFORTH_CORE_H
#include "eforth_config.h"
#define EXE_TRACE     0  
#define COMPUTED_GOTO 0  
#if ARDUINO
 
#include <Arduino.h>
#include <avr/pgmspace.h>
#define LOG(s)              io->print(F(s))
#define LOG_C(c)            { io->print(c); if (c=='\n') io->flush(); }
#define LOG_V(s, n)         { io->print(F(s)); io->print((DU)(n)); }
#define LOG_H(s, n)         { io->print(F(s)); io->print((n), HEX); }
#define CLI()               cli()
#define SEI()               sei()
 
#else  // !ARDUINO
 
#include <stdlib.h>
typedef const char          *PGM_P;
#define pgm_read_byte(b)    *((U8*)(b))
#define PROGMEM
#define Stream              char
#define millis()            ((U32)clock())
#define pinMode(a,b)
#define digitalRead(p)      (0)
#define digitalWrite(p,v)
#define analogRead(p)       (0)
#define analogWrite(p,v)
#define map(a,b,c,d,e)      (0)
#define LOG(s)              printf("%s", (s))
#define LOG_C(c)            printf("%c", (c))
#define LOG_V(s, n)         printf("%s%d", (s), (n))
#define LOG_H(s, n)         printf("%s%x", (s), (U16)((n)&0xffff))
#define LOW                 (0)
#define HIGH                (1)
#define CLI()
#define SEI()
 
#endif // ARDUINO
 
void intr_reset();          
U16  intr_hits();
IU   intr_service();
void intr_add_tmisr(U8 i, U16 ms, IU xt);
void intr_add_pcisr(U8 pin, IU xt);
void intr_timer_enable(U8 f);
void intr_pci_enable(U8 f);
void vm_init(
    PGM_P rom,              
    U8    *ram,             
    void  *io_stream,       
    const char *code        
    );
void vm_outer();            
int  ef_save(U8 *ram);      
int  ef_load(U8 *ram);      
#endif // __EFORTH_CORE_H