diff options
Diffstat (limited to 'genvmop.txr')
| -rw-r--r-- | genvmop.txr | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/genvmop.txr b/genvmop.txr index fa1af41c..7cc097e6 100644 --- a/genvmop.txr +++ b/genvmop.txr @@ -11,8 +11,17 @@ @{copyright "\n"} typedef enum vm_op { -@ (repeat :vars (oc)) - @{oc.symbol :filter :upcase} = @{oc.code}, +@ (repeat) + @{oc.symbol :filter :upcase} = @{oc.code},@(if oc.deprecated + " /* deprecated */") @ (end) } vm_op_t; + +#define VM_LEV_BITS @{sys:%lev-bits%} +#define VM_LEV_MASK @(fmt "0x~X" (pred (ash 1 sys:%lev-bits%))) +#define VM_SM_LEV_BITS @{sys:%sm-lev-bits%} +#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) |