diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2021-02-10 20:22:15 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-02-10 20:22:15 -0800 |
| commit | 7d5ebc10065443a69bc848e65636a96ce8db632f (patch) | |
| tree | 77122735769bde0b2088dcbd83a552b191fd5fce /genvmop.txr | |
| parent | 7a957692314786f988cf126fcc86aad2708d8ba7 (diff) | |
| download | txr-7d5ebc10065443a69bc848e65636a96ce8db632f.tar.gz txr-7d5ebc10065443a69bc848e65636a96ce8db632f.tar.bz2 txr-7d5ebc10065443a69bc848e65636a96ce8db632f.zip | |
vm: remove hard-coded constants.
* genvmop.txr: Define VM_LEV_SIZE from %lev-size%.
* vm.c (vm_make_desc): Use VM_MAX_LEV and VM_LEV_SIZE instead
of incorrect hard-coded values of 256 that were right for an
old version of the vm.
* vmop.h: Regenerated.
Diffstat (limited to 'genvmop.txr')
| -rw-r--r-- | genvmop.txr | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/genvmop.txr b/genvmop.txr index 5e80948a..7cc097e6 100644 --- a/genvmop.txr +++ b/genvmop.txr @@ -23,4 +23,5 @@ typedef enum vm_op { #define VM_SM_LEV_MASK @(fmt "0x~X" (pred (ash 1 sys:%sm-lev-bits%))) #define VM_MAX_LEV @{sys:%max-lev%} #define VM_MAX_V_LEV @{sys:%max-v-lev%} +#define VM_LEV_SIZE @{sys:%lev-size%} @(end) |