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

mescc: Tinycc support: workaround for tcc; this breaks: Structured type with char or short on heap.

Browse source 
* module/language/c99/compiler.mes (int->bv): Always use 32bit byte
  vector.
This commit is contained in:
Jan Nieuwenhuizen 2018-05-20 08:58:44 +02:00
parent def730d74a
commit f8f0aacb61
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273
2 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
build-aux/check-mescc.sh
View file

@ -126,6 +126,7 @@ t
" "
broken="$broken broken="$broken
7s-struct-short
" "
set +e set +e

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

@ -2276,8 +2276,8 @@
(define (int->bv type o) (define (int->bv type o)
(let ((size (->size type))) (let ((size (->size type)))
(case size (case size
((1) (int->bv8 o)) ;;((1) (int->bv8 o))
((2) (int->bv16 o)) ;;((2) (int->bv16 o))
(else (int->bv32 o))))) (else (int->bv32 o)))))
(define (init->strings o info) (define (init->strings o info)