diff --git a/src/builtins/sysfn.c b/src/builtins/sysfn.c index 80c2809c..bb7313fb 100644 --- a/src/builtins/sysfn.c +++ b/src/builtins/sysfn.c @@ -453,8 +453,8 @@ B exit_c1(B t, B x) { bqn_exit(q_i32(x)? o2i(x) : 0); } -B getInternalNS(); -B getMathNS(); +B getInternalNS(void); +B getMathNS(void); static B file_nsGen; B sys_c1(B t, B x) { diff --git a/src/core/gstack.h b/src/core/gstack.h index 4531d2b2..41bd1a92 100644 --- a/src/core/gstack.h +++ b/src/core/gstack.h @@ -10,7 +10,7 @@ extern B* gStack; // points to after end extern B* gStackStart; extern B* gStackEnd; -void gsPrint(); +void gsPrint(void); static void gsReserve(u64 am) { #ifdef GS_REALLOC diff --git a/src/core/heap.h b/src/core/heap.h index a70d04fb..88047f6a 100644 --- a/src/core/heap.h +++ b/src/core/heap.h @@ -1,4 +1,4 @@ -u64 mm_heapUsed(); +u64 mm_heapUsed(void); #ifdef HEAP_VERIFY @@ -18,6 +18,6 @@ static bool heapVerify_visitP(void* x) { else if(heapVerify_mode==2) if (x==heap_observed) { printf("referee: %p ", heap_curr); print(tag(heap_curr,OBJ_TAG)); putchar('\n'); } return true; } -void heapVerify(); +void heapVerify(void); #endif diff --git a/src/core/stuff.h b/src/core/stuff.h index 34faa7d0..6fa3ec7b 100644 --- a/src/core/stuff.h +++ b/src/core/stuff.h @@ -6,9 +6,9 @@ static u64 mm_size(Value* x); static void mm_visit(B x); static void mm_visitP(void* x); NORETURN void bqn_exit(i32 code); -u64 mm_heapUsed(); -void printAllocStats(); -void vm_pstLive(); +u64 mm_heapUsed(void); +void printAllocStats(void); +void vm_pstLive(void); #ifndef MAP_NORESERVE diff --git a/src/h.h b/src/h.h index e17ab0b1..7f96dd16 100644 --- a/src/h.h +++ b/src/h.h @@ -144,7 +144,7 @@ static const u16 VAL_TAG = 0b1111111111110 ; // FFF. 1111111111110............ #define tag(V, T) b(((u64)(V)) | ftag(T)) #define taga(V) tag(V, ARR_TAG) -void cbqn_init(); +void cbqn_init(void); typedef union B { u64 u; @@ -215,13 +215,13 @@ typedef struct Arr { // memory manager typedef void (*V2v)(Value*); -typedef void (*vfn)(); +typedef void (*vfn)(void); void gc_add(B x); // add permanent root object void gc_addFn(vfn f); // add function that calls mm_visit/mm_visitP for dynamic roots -void gc_maybeGC(); // gc if that seems necessary -void gc_forceGC(); // force a gc; who knows what happens if gc is disabled (probably should error) -void gc_visitRoots(); +void gc_maybeGC(void); // gc if that seems necessary +void gc_forceGC(void); // force a gc; who knows what happens if gc is disabled (probably should error) +void gc_visitRoots(void); // some primitive actions static const B bi_N = b((u64)0x7FF2000000000000ull); // tag(0, TAG_TAG); // make gcc happy @@ -260,14 +260,14 @@ B bqn_repr(B x); // consumes NOINLINE NORETURN void thr(B b); NOINLINE NORETURN void thrM(char* s); NOINLINE NORETURN void thrF(char* s, ...); -NOINLINE NORETURN void thrOOM(); -jmp_buf* prepareCatch(); +NOINLINE NORETURN void thrOOM(void); +jmp_buf* prepareCatch(void); #if CATCH_ERRORS #define CATCH setjmp(*prepareCatch()) // use as `if (CATCH) { /*handle error*/ dec(catchMessage); } /*potentially erroring thing*/ popCatch();` #else // note: popCatch() must always be called if no error was caught, so no returns before it! #define CATCH false #endif -void popCatch(); +void popCatch(void); extern B catchMessage; @@ -281,7 +281,7 @@ extern B catchMessage; #define srnk(X,R) sprnk(v(X),R) #define VTY(X,T) assert(isVal(X) && v(X)->type==(T)) -void print_vmStack(); +void print_vmStack(void); #ifdef DEBUG B validate(B x); Value* validateP(Value* x); diff --git a/src/load.c b/src/load.c index c26167dc..44dff045 100644 --- a/src/load.c +++ b/src/load.c @@ -333,7 +333,7 @@ B bqn_execFile(B path, B args) { // consumes both return bqn_exec(file_chars(inc(path)), path, args); } -void rtWrap_print(); +void rtWrap_print(void); void bqn_exit(i32 code) { rtWrap_print(); CTR_FOR(CTR_PRINT) @@ -435,7 +435,7 @@ static inline void base_init() { // very first init function } #define FOR_INIT(F) F(base) F(harr) F(fillarr) F(i32arr) F(c32arr) F(f64arr) F(hash) F(sfns) F(fns) F(arith) F(md1) F(md2) F(derv) F(comp) F(rtWrap) F(ns) F(nfn) F(sysfn) F(load) F(sysfnPost) -#define F(X) void X##_init(); +#define F(X) void X##_init(void); FOR_INIT(F) #undef F void cbqn_init() { diff --git a/src/vm.h b/src/vm.h index 3c447948..81b6c72d 100644 --- a/src/vm.h +++ b/src/vm.h @@ -168,12 +168,12 @@ static inline void popEnv() { envCurr--; } void vm_pst(Env* s, Env* e); -void vm_pstLive(); +void vm_pstLive(void); void vm_printPos(Comp* comp, i32 bcPos, i64 pos); NOINLINE B vm_fmtPoint(B src, B prepend, B path, usz cs, usz ce); // consumes prepend NOINLINE void printErrMsg(B msg); NOINLINE void unwindEnv(Env* envNew); // envNew==envStart-1 for emptying the env stack -NOINLINE void unwindCompiler(); // unwind to the env of the invocation of the compiler; UB when not in compiler! +NOINLINE void unwindCompiler(void); // unwind to the env of the invocation of the compiler; UB when not in compiler! typedef struct FldAlias {