fix typo in a debugging assertion

original commit: 10148ea09455445a76b037e2e9fb5abcb72913ae
This commit is contained in:
Matthew Flatt 2020-03-07 07:06:05 -07:00
parent 75872880f8
commit 35e77092f3

View File

@ -1629,7 +1629,7 @@
(define popcount-op (define popcount-op
(let ([target `(x86_64-popcount ,(constant code-data-disp) (library ,(lookup-libspec popcount-slow)))]) (let ([target `(x86_64-popcount ,(constant code-data-disp) (library ,(lookup-libspec popcount-slow)))])
(lambda (op size dest-rax src-rcx inline? code*) (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 (record-case dest-rax
[(reg) dest-rax [(reg) dest-rax
(record-case src-rcx (record-case src-rcx