d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Added a test that at some point failed for the new CEMCOM

Browse source
This commit is contained in:
ceriel 1988-01-19 11:45:43 +00:00
parent ad2d61154b
commit 9dfa2f6979
2 changed files with 14 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
lang/cem/ctest/ctconv/conv.c
View file

@ -10,6 +10,7 @@ char rcs_id[] = "$Header$" ;
main() {
t1() ;
t2() ;
return 0 ;
}
@ -139,3 +140,14 @@ t1() {
}
return 0 ;
}
t2()
{
long l1 = 0x1f010L;
long l2;
l2 = (unsigned short) l1;
printf("(unsigned short) 0x1f010L = 0x%lx\n", l2);
l2 = (short) l1;
printf("(short) 0x1f010L = 0x%lx\n", l2);
}

2
lang/cem/ctest/ctconv/conv.cem.g
View file

@ -30,3 +30,5 @@ From float
long 1223432064, float 1223432064.000000
a[l] (l==3) -17
a[3l] -17
(unsigned short) 0x1f010L = 0xf010
(short) 0x1f010L = 0xfffff010