From 35e77092f31e237a6b3bf88683c2e5de672e75f2 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sat, 7 Mar 2020 07:06:05 -0700
Subject: [PATCH] fix typo in a debugging assertion

original commit: 10148ea09455445a76b037e2e9fb5abcb72913ae
---
 s/x86_64.ss | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/s/x86_64.ss b/s/x86_64.ss
index 4380f98d67..5c187b9915 100644
--- a/s/x86_64.ss
+++ b/s/x86_64.ss
@@ -1629,7 +1629,7 @@
   (define popcount-op
     (let ([target `(x86_64-popcount ,(constant code-data-disp) (library ,(lookup-libspec popcount-slow)))])
       (lambda (op size dest-rax src-rcx inline? code*)
-        (safe-assert (and (ax-register? dest-rax) (ax-register? src-dir)))
+        (safe-assert (and (ax-register? dest-rax) (ax-register? src-rcx)))
         (record-case dest-rax
           [(reg) dest-rax
            (record-case src-rcx