mescc: Tinycc support: workaround for tcc; this breaks: Structured type with char...
authorJan Nieuwenhuizen <janneke@gnu.org>
Sun, 20 May 2018 06:58:44 +0000 (08:58 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Sun, 20 May 2018 06:58:44 +0000 (08:58 +0200)
* module/language/c99/compiler.mes (int->bv): Always use 32bit byte
  vector.

build-aux/check-mescc.sh
module/language/c99/compiler.mes

index 34242e2c58a4646128434d96bcce91b9a0e54df2..cb9e5add76841eb6c23b6a2f9c0e6cb8d46f3d03 100755 (executable)
@@ -126,6 +126,7 @@ t
 "
 
 broken="$broken
+7s-struct-short
 "
 
 set +e
index 235eb254b9965fa63e2ca24f08240d0eadd6f6ab..3c146d590eec5fe8e2013ed6ff6a05885b1d9b7b 100644 (file)
 (define (int->bv type o)
   (let ((size (->size type)))
     (case size
-      ((1) (int->bv8 o))
-      ((2) (int->bv16 o))
+      ;;((1) (int->bv8 o))
+      ;;((2) (int->bv16 o))
       (else (int->bv32 o)))))
 
 (define (init->strings o info)