fix typo in a debugging assertion

original commit: 10148ea09455445a76b037e2e9fb5abcb72913ae
2020-03-07 07:06:05 -07:00 · 2020-03-07 07:06:05 -07:00 · 35e77092f3
commit 35e77092f3
parent 75872880f8
1 changed files with 1 additions and 1 deletions
--- 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