From d3705ad6676c19417b69cf38dd3667f6b3c3d2ef Mon Sep 17 00:00:00 2001
From: Gabor Melis <mega@hotpop.com>
Date: Tue, 7 Apr 2009 13:04:14 +0000
Subject: [PATCH] 1.0.27.4: x86/x86-64 REP prefix has the same code as REPE
 (not REPNE)

... although it seems to work either way.
---
 src/compiler/x86-64/insts.lisp |    2 +-
 src/compiler/x86/insts.lisp    |    2 +-
 version.lisp-expr              |    2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/compiler/x86-64/insts.lisp b/src/compiler/x86-64/insts.lisp
index ec48990..7b800e4 100644
--- a/src/compiler/x86-64/insts.lisp
+++ b/src/compiler/x86-64/insts.lisp
@@ -2400,7 +2400,7 @@
 
 (define-instruction rep (segment)
   (:emitter
-   (emit-byte segment #b11110010)))
+   (emit-byte segment #b11110011)))
 
 (define-instruction repe (segment)
   (:printer byte ((op #b11110011)))
diff --git a/src/compiler/x86/insts.lisp b/src/compiler/x86/insts.lisp
index f68a541..39a7d09 100644
--- a/src/compiler/x86/insts.lisp
+++ b/src/compiler/x86/insts.lisp
@@ -1894,7 +1894,7 @@
 
 (define-instruction rep (segment)
   (:emitter
-   (emit-byte segment #b11110010)))
+   (emit-byte segment #b11110011)))
 
 (define-instruction repe (segment)
   (:printer byte ((op #b11110011)))
diff --git a/version.lisp-expr b/version.lisp-expr
index 3809e5a..09502f2 100644
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.27.3"
+"1.0.27.4"
-- 
1.7.10.4