From 177fa96a9326fe46e99d14131fe48e5ae139fa84 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Fri, 11 Jun 2021 17:48:12 -0700 Subject: [PATCH] . --- shell/environment.mu | 2 +- shell/sandbox.mu | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/shell/environment.mu b/shell/environment.mu index 9e9a3bb7..f1634470 100644 --- a/shell/environment.mu +++ b/shell/environment.mu @@ -371,7 +371,7 @@ fn edit-environment _self: (addr environment), key: grapheme, data-disk: (addr d edit-sandbox sandbox, key, globals, data-disk } -fn read-evaluate-and-save-to-globals _in-ah: (addr handle gap-buffer), result-ah: (addr handle cell), globals: (addr global-table), definitions-created: (addr stream int), trace: (addr trace), screen-cell: (addr handle cell), keyboard-cell: (addr handle cell) { +fn read-evaluate-and-save-gap-buffer-to-globals _in-ah: (addr handle gap-buffer), result-ah: (addr handle cell), globals: (addr global-table), definitions-created: (addr stream int), trace: (addr trace), screen-cell: (addr handle cell), keyboard-cell: (addr handle cell) { var in-ah/eax: (addr handle gap-buffer) <- copy _in-ah var in/eax: (addr gap-buffer) <- lookup *in-ah var read-result-h: (handle cell) diff --git a/shell/sandbox.mu b/shell/sandbox.mu index 3c492d58..52302ef3 100644 --- a/shell/sandbox.mu +++ b/shell/sandbox.mu @@ -632,7 +632,7 @@ fn run-sandbox _self: (addr sandbox), globals: (addr global-table) { var keyboard-cell/eax: (addr handle cell) <- get self, keyboard-var rewind-keyboard-cell keyboard-cell # don't clear keys from before # - read-evaluate-and-save-to-globals data-ah, eval-result-ah, globals, definitions-created, trace, screen-cell, keyboard-cell + read-evaluate-and-save-gap-buffer-to-globals data-ah, eval-result-ah, globals, definitions-created, trace, screen-cell, keyboard-cell # if necessary, initialize a new gap-buffer for sandbox { compare globals, 0