artemist/mes
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

mescc: Oops typo.

Browse source 
* module/mescc/M1.scm (hex2:immediate8): Typo.
This commit is contained in:
Jan Nieuwenhuizen 2018-10-12 09:37:10 +02:00
parent a155a0a9a2
commit cc473c1d72
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
module/mescc/M1.scm
View file

@ -87,7 +87,7 @@
(dec->hex (quotient o #x100000000)))) (dec->hex (quotient o #x100000000))))
(string-append "%" (number->string (dec->hex (modulo o #x100000000))) (string-append "%" (number->string (dec->hex (modulo o #x100000000)))
" %" (if (< o 0) "-1" " %" (if (< o 0) "-1"
(number->string (dec->hex (quoteint o #x100000000))))))) (number->string (dec->hex (quotient o #x100000000)))))))
(define* (display-join o #:optional (sep "")) (define* (display-join o #:optional (sep ""))
(let loop ((o o)) (let loop ((o o))