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

mescc: Tinycc support: ((unsigned char*)str)[i].

Browse source 
* module/language/c99/compiler.mes (expr->accu*): Consider size of
  expr array deref.
* scaffold/tests/7d-cast-char.c: Test it.
This commit is contained in:
Jan Nieuwenhuizen 2017-08-04 11:40:04 +02:00
parent 949e320622
commit d64a304a83
2 changed files with 8 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
module/language/c99/compiler.mes
View file

@ -1176,7 +1176,9 @@
((array-ref ,index ,array)
(let* ((info ((expr->accu info) index))
(size 4) ;; FIXME
(ptr (expr->pointer info array))
(size (if (= ptr 1) (expr->size info array)
4))
(info (append-text info (wrap-as (append (i386:accu->base)
(if (eq? size 1) '()
(append

5
scaffold/tests/7d-cast-char.c
View file

@ -29,5 +29,10 @@ test ()
int i = ((unsigned char *)s)[0];
if (i != 'i') return 2;
c = s[1];
if (c != 'n') return 3;
i = ((unsigned char *)s)[1];
if (i != 'n') return 3;
return 0;
}