diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-03-09 10:01:06 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-03-09 10:01:06 +0000 |
commit | de7c3ec210cb5374bfcd133394fa35f0c7f516ac (patch) | |
tree | 2882b70cc334b9989970233ceeb356f22dd65616 | |
parent | 8a64451e6f474d20a469b939a938577bbe6d3d66 (diff) | |
download | compcert-de7c3ec210cb5374bfcd133394fa35f0c7f516ac.tar.gz compcert-de7c3ec210cb5374bfcd133394fa35f0c7f516ac.zip |
PrintCminor: printing Sskip
test/cminor: updating
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1839 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
-rw-r--r-- | backend/PrintCminor.ml | 2 | ||||
-rw-r--r-- | test/cminor/Makefile | 4 | ||||
-rw-r--r-- | test/cminor/mainconversions.c | 4 | ||||
-rw-r--r-- | test/cminor/marksweep.cmp | 2 |
4 files changed, 6 insertions, 6 deletions
diff --git a/backend/PrintCminor.ml b/backend/PrintCminor.ml index 330c6c21..619c788b 100644 --- a/backend/PrintCminor.ml +++ b/backend/PrintCminor.ml @@ -173,7 +173,7 @@ let rec print_sig p = function let rec print_stmt p s = match s with | Sskip -> - fprintf p "/*skip*/;" + fprintf p "/*skip*/" | Sassign(id, e2) -> fprintf p "@[<hv 2>%s =@ %a;@]" (ident_name id) print_expr e2 | Sstore(chunk, a1, a2) -> diff --git a/test/cminor/Makefile b/test/cminor/Makefile index 04c01bca..a66bcc6d 100644 --- a/test/cminor/Makefile +++ b/test/cminor/Makefile @@ -62,12 +62,12 @@ clean:: rm -f lists stopcopy: stopcopy.o maingc.o - $(CC) $(CFLAGS) -o stopcopy stopcopy.o maingc.o + $(CC) $(CFLAGS) -o stopcopy stopcopy.o maingc.o $(LIBMATH) clean:: rm -f stopcopy marksweep: marksweep.o maingc.o marksweepcheck.o - $(CC) $(CFLAGS) -o marksweep marksweep.o maingc.o marksweepcheck.o + $(CC) $(CFLAGS) -o marksweep marksweep.o maingc.o marksweepcheck.o $(LIBMATH) clean:: rm -f marksweep diff --git a/test/cminor/mainconversions.c b/test/cminor/mainconversions.c index 4adfaa53..a274e991 100644 --- a/test/cminor/mainconversions.c +++ b/test/cminor/mainconversions.c @@ -98,9 +98,9 @@ int main(int argc, char ** argv) int numtests = 1000000; TEST(test_intoffloat, cases_intoffloat, double, - (random_double() - 2147483648.0) * 1.1); + (random_double() - 2147483648.0)); TEST(test_intuoffloat, cases_intuoffloat, double, - random_double() * 1.1); + random_double()); TEST(test_floatofint, cases_floatofint, int, (int) random_uint()); TEST(test_floatofintu, cases_floatofintu, unsigned int, diff --git a/test/cminor/marksweep.cmp b/test/cminor/marksweep.cmp index 3988299a..5b356784 100644 --- a/test/cminor/marksweep.cmp +++ b/test/cminor/marksweep.cmp @@ -44,7 +44,7 @@ var "gray_cache_overflow"[4] p = "freelist_head"; {{ {{ loop { b = int32[p]; /* b is current free block */ - if (b == 0) exit 2; /* free list exhausted */ + if (b == 0) exit 1; /* free list exhausted */ header = int32[b - 4]; size = Size_header(header); if (size >= req_size) exit; |