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

mescc: Put char's ASCII code into register, not char.

Browse source 
* module/mescc/compile.scm (expr-register): Put char's ASCII code into
register, not char.
This commit is contained in:
Danny Milosavljevic 2019-05-30 22:11:37 +02:00 committed by Jan Nieuwenhuizen
parent 7670d6be38
commit a5f16861ab
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/compile.scm
View file

@ -942,7 +942,7 @@
(,char (guard (char? char)) (,char (guard (char? char))
(let ((info (allocate-register info))) (let ((info (allocate-register info)))
(append-text info (wrap-as (as info 'value->r char))))) (append-text info (wrap-as (as info 'value->r (char->integer char))))))
((p-expr (ident ,name)) ((p-expr (ident ,name))
(let ((info (allocate-register info))) (let ((info (allocate-register info)))