#ifndef __SPL_RT_H__ #define __SPL_RT_H__ #include #include #include #include #include #if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L #define SPL_FN static inline #elif defined(__GNUC__) || defined(__clang__) #define SPL_FN static __inline__ #else #define SPL_FN static #endif #include typedef uint8_t u8; typedef int8_t i8; typedef uint16_t u16; typedef int16_t i16; typedef uint32_t u32; typedef int32_t i32; typedef uint64_t u64; typedef int64_t i64; #ifndef SPL_USIZE_TYPEDEF #define SPL_USIZE_TYPEDEF typedef u64 usize; #endif #ifndef SPL_ISIZE_TYPEDEF #define SPL_ISIZE_TYPEDEF typedef i64 isize; #endif SPL_FN void spl_panic(const char *msg) { fprintf(stderr, "%s\n", msg ? msg : "panic"); exit(1); } SPL_FN void spl_trap(void) { abort(); } #include "spl_rt_core.h" SPL_FN void *vm_fopen(void *path, void *mode) { return (void *)fopen((const char *)path, (const char *)mode); } SPL_FN i32 vm_fclose(void *f) { return f ? fclose((FILE *)f) : 0; } SPL_FN u64 vm_fread(void *buf, u64 sz, u64 n, void *f) { return f ? (u64)fread(buf, (size_t)sz, (size_t)n, (FILE *)f) : 0; } SPL_FN u64 vm_fwrite(void *buf, u64 sz, u64 n, void *f) { return f ? (u64)fwrite(buf, (size_t)sz, (size_t)n, (FILE *)f) : 0; } SPL_FN u64 vm_fsize(void *f) { long cur, end; if (!f) return 0; cur = ftell((FILE *)f); if (cur < 0) return 0; if (fseek((FILE *)f, 0, SEEK_END) != 0) return 0; end = ftell((FILE *)f); fseek((FILE *)f, cur, SEEK_SET); return end < 0 ? 0 : (u64)end; } SPL_FN void *vm_stdin(void) { return (void *)stdin; } SPL_FN void *vm_stdout(void) { return (void *)stdout; } SPL_FN void *vm_stderr(void) { return (void *)stderr; } SPL_FN i32 vm_putchar(i32 c) { return fputc(c, stdout); } SPL_FN i32 vm_getchar(void) { return fgetc(stdin); } SPL_FN void vm_exit(i32 code) { exit(code); } SPL_FN u64 vm_timestamp(u64 kind) { time_t sec = time(NULL); if (kind == 1) return (u64)sec; if (kind == 2) return 0; if (kind == 4) return (u64)sec * 1000000000ull; return 0; } #define SPL_VM_EMBED_IMPLIMENTATION #include "spl_vm_embed.h" #endif /* __SPL_RT_H__ */