Delete old vm

2026-02-15 13:30:54 -06:00
parent b50d3109c0
commit 51e34c9750
7 changed files with 25 additions and 270 deletions
--- a/scmvm/util/stack.scm
+++ b/scmvm/util/stack.scm
@@ -1,7 +1,8 @@
 (define-module (scmvm util stack)
  #:use-module (srfi srfi-43)
-  #:export (make-stack stack-ref stack->list stack-set!
-                       (push . stack-push) (pop . stack-pop) (peek . stack-peek) (swap . stack-swap)))
+  #:replace (make-stack)
+  #:export (stack-ref stack->list stack-set!
+            (push . stack-push) (pop . stack-pop) (peek . stack-peek) (swap . stack-swap)))

 ;; Stack data structure. I made this a closure implementation for some reason