From 15a70836ac77dda317da05b045c0b9dfbdb27265 Mon Sep 17 00:00:00 2001 From: John Lorentzson Date: Thu, 8 May 2025 22:04:34 +0200 Subject: [PATCH] Add temporary ARGVEC and VARVEC definitions --- wip-duuqnd/user-side-compiler/high-level.lisp | 3 +++ 1 file changed, 3 insertions(+) diff --git a/wip-duuqnd/user-side-compiler/high-level.lisp b/wip-duuqnd/user-side-compiler/high-level.lisp index e69d6b6..09aadba 100644 --- a/wip-duuqnd/user-side-compiler/high-level.lisp +++ b/wip-duuqnd/user-side-compiler/high-level.lisp @@ -1,5 +1,8 @@ (in-package #:user-side-compiler) +(defparameter *varvec* (make-label :name "VARVEC" :address #x8100)) +(defparameter *argvec* (make-label :name "ARGVEC" :address #xF0)) + (defvar *instruction-source* nil) (defvar *compile-result*)