From a68b97dd58cad1e3d153d790ab51659f7272f6b4 Mon Sep 17 00:00:00 2001 From: Stephen Adams Date: Wed, 8 Mar 1995 13:38:51 +0000 Subject: [PATCH] Added rule for storing a zero byte. --- v8/src/compiler/machines/spectrum/rules1.scm | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/v8/src/compiler/machines/spectrum/rules1.scm b/v8/src/compiler/machines/spectrum/rules1.scm index 90a28439a..89dd3a4c5 100644 --- a/v8/src/compiler/machines/spectrum/rules1.scm +++ b/v8/src/compiler/machines/spectrum/rules1.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: rules1.scm,v 1.1 1994/11/19 02:08:04 adams Exp $ +$Id: rules1.scm,v 1.2 1995/03/08 13:38:51 adams Exp $ Copyright (c) 1989-1994 Massachusetts Institute of Technology @@ -480,8 +480,13 @@ MIT in each case. |# (CHAR->ASCII (REGISTER (? source)))) (store-byte (standard-source! source) offset (standard-source! base))) +;; store null byte in memory +(define-rule statement + (ASSIGN (BYTE-OFFSET (REGISTER (? base)) (MACHINE-CONSTANT (? offset))) + (CONSTANT 0)) + (store-byte 0 offset (standard-source! base))) + (define-rule statement - ;; store null byte in memory (ASSIGN (BYTE-OFFSET (REGISTER (? base)) (MACHINE-CONSTANT (? offset))) (CHAR->ASCII (CONSTANT #\NUL))) (store-byte 0 offset (standard-source! base))) -- 2.25.1