changes vm reg data types

BigNoobWasTaken · BigNoobWasTaken · commit 16f9e6f3394d · 2025-08-02T06:05:09.000Z
diff --git a/src/tensor-array/interp/parser.c b/src/tensor-array/interp/parser.c
@@ -24,21 +24,21 @@ limitations under the License.
 #include "sym_map.h"
 #include "vm_type.h"
 
-void emit(int size, ...)
+void emit(unsigned size, ...)
 {
     va_list args;
     va_start(args, size);
     
     // Process the variable arguments as needed
-    for (int i = 0; i < size; ++i) {
+    for (unsigned i = 0; i < size; ++i) {
         ++text;
         *text = va_arg(args, VM_INSTRUCTION);
     }
     
     va_end(args);
 }
 
-void match(long tk)
+void match(int tk)
 {
     if (tkn == tk) {
         token_next(); // Move to the next token
diff --git a/src/tensor-array/interp/sym_map.h b/src/tensor-array/interp/sym_map.h
@@ -20,10 +20,10 @@ extern "C"
 #endif
     typedef struct
     {
-        long tkn;
-        long hash;
-        long cls;
-        long type;
+        int tkn;
+        int hash;
+        int cls;
+        int type;
         void* data; // Pointer to additional data if needed
     } sym_data;
     void sym_data_set(char* name, sym_data dat);
diff --git a/src/tensor-array/interp/token.c b/src/tensor-array/interp/token.c
@@ -22,8 +22,8 @@ limitations under the License.
 #include "open_file.h"
 #include "token.h"
 
-long tkn = 0;
-long tkn_val = 0; // Variable to hold the value of the current token
+int tkn = 0;
+int tkn_val = 0; // Variable to hold the value of the current token
 
 char* tknname[] = {
     "num", "sys", "glo", "loc", "id",
diff --git a/src/tensor-array/interp/token.h b/src/tensor-array/interp/token.h
@@ -25,6 +25,6 @@ typedef enum
 } TOKEN_TYPE;
 
 void token_next();
-extern long tkn;
-extern long tkn_val;
+extern int tkn;
+extern int tkn_val;
 extern char *tknname[];
diff --git a/src/tensor-array/interp/vm.h b/src/tensor-array/interp/vm.h
@@ -21,9 +21,9 @@ typedef enum
     OPEN, READ, CLOSE, PRTF, MALC, MSET, MCMP, EXIT
 } VM_INSTRUCTION_V2;
 
-typedef long VM_INSTRUCTION;
+typedef size_t VM_INSTRUCTION;
 
 void eval();
 
-extern long any_value;
+extern size_t any_value;
 extern VM_INSTRUCTION* orig;
diff --git a/src/tensor-array/interp/vmop.cc b/src/tensor-array/interp/vmop.cc
@@ -22,16 +22,16 @@ limitations under the License.
 #include "vmop.h"
 #include "vm_type.h"
 
-typedef void* VM_INSTRUCTION;
+typedef size_t VM_INSTRUCTION;
 extern VM_INSTRUCTION* pc;
 
 std::stack<tensor_array::value::Tensor> tensor_stack;
 std::stack<std::string> var_stack;
 std::stack<std::pair<VM_INSTRUCTION*, scope>> call_stack;
 tensor_array::value::Tensor ag;
 void* aptr;
-long any_value;
-long any_type;
+size_t any_value;
+size_t any_type;
 
 void new_int()
 {
diff --git a/src/tensor-array/interp/vmop.h b/src/tensor-array/interp/vmop.h
@@ -18,8 +18,8 @@ limitations under the License.
 extern "C"
 {
 #endif
-    extern long any_value;
-    extern long any_type;
+    extern size_t any_value;
+    extern size_t any_type;
     void op_imm();
     void op_add();
     void op_sub();

Original file line number	Diff line number	Diff line change
`@@ -24,21 +24,21 @@ limitations under the License.`
`24`	`24`	`#include "sym_map.h"`
`25`	`25`	`#include "vm_type.h"`
`26`	`26`
`27`		`-void emit(int size, ...)`
	`27`	`+void emit(unsigned size, ...)`
`28`	`28`	`{`
`29`	`29`	`va_list args;`
`30`	`30`	`va_start(args, size);`
`31`	`31`
`32`	`32`	`// Process the variable arguments as needed`
`33`		`- for (int i = 0; i < size; ++i) {`
	`33`	`+ for (unsigned i = 0; i < size; ++i) {`
`34`	`34`	`++text;`
`35`	`35`	`*text = va_arg(args, VM_INSTRUCTION);`
`36`	`36`	`}`
`37`	`37`
`38`	`38`	`va_end(args);`
`39`	`39`	`}`
`40`	`40`
`41`		`-void match(long tk)`
	`41`	`+void match(int tk)`
`42`	`42`	`{`
`43`	`43`	`if (tkn == tk) {`
`44`	`44`	`token_next(); // Move to the next token`