From: Taylor R Campbell <campbell@mumble.net>
Date: Sun, 16 Mar 2014 14:56:10 +0000 (+0000)
Subject: Clarify comment over amd64 fixnum_shift hook.
X-Git-Tag: release-9.2.0~26
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=0a2448a3872910124fac48e789490da1ffa57d2f;p=mit-scheme.git

Clarify comment over amd64 fixnum_shift hook.
---

diff --git a/src/microcode/cmpauxmd/x86-64.m4 b/src/microcode/cmpauxmd/x86-64.m4
index 7a4856dc9..d47d0bc15 100644
--- a/src/microcode/cmpauxmd/x86-64.m4
+++ b/src/microcode/cmpauxmd/x86-64.m4
@@ -931,9 +931,9 @@ define_jump_indirection(generic_modulo,39)
 
 # Input and output in rax, shift count in rcx, all detagged fixnums.
 # Return address is at the top of the stack, untagged.  This hook must
-# not use any registers other than rax and rcx; if it does, the code
-# to generate calls to it, in compiler/machines/x86-64/rulfix.scm,
-# must clear the register map first.
+# not write to any register other than rax; if it does, the code to
+# generate calls to it, in compiler/machines/x86-64/rulfix.scm, must
+# clear the register map first.
 
 define_hook_label(fixnum_shift)
 	OP(sar,q)	TW(IMM(TC_LENGTH),REG(rcx))