X-Git-Url: https://oss.titaniummirror.com/gitweb?a=blobdiff_plain;f=gcc%2Ftestsuite%2Fgcc.c-torture%2Fexecute%2F20010724-1.c;fp=gcc%2Ftestsuite%2Fgcc.c-torture%2Fexecute%2F20010724-1.c;h=0000000000000000000000000000000000000000;hb=6fed43773c9b0ce596dca5686f37ac3fc0fa11c0;hp=8ff7d0f44a0ed7c0a2fcc68ed2ee2fde3bc218bf;hpb=27b11d56b743098deb193d510b337ba22dc52e5c;p=msp430-gcc.git diff --git a/gcc/testsuite/gcc.c-torture/execute/20010724-1.c b/gcc/testsuite/gcc.c-torture/execute/20010724-1.c deleted file mode 100644 index 8ff7d0f4..00000000 --- a/gcc/testsuite/gcc.c-torture/execute/20010724-1.c +++ /dev/null @@ -1,59 +0,0 @@ -/* Verify that the workarounds in config/mips/irix6-libc-compat.c are still - needed. */ - -/* IRIX 6, unlike other Unix systems, defines union semun in . - Inhibit this definition to be able to run this test on other platforms. */ -#define _XOPEN_SOURCE - -#include -#include -#include -#include -#include - -union semun { - int val; - struct semid_ds *buf; - ushort_t *array; -}; - -int -main (void) -{ - struct in_addr ia; - int semid; - union semun su; - - ia.s_addr = INADDR_BROADCAST; - - if (strcmp (inet_ntoa (ia), "255.255.255.255") != 0) - abort (); - - ia.s_addr = INADDR_LOOPBACK; - - if (inet_lnaof (ia) != 1) - abort (); - - if (inet_netof (ia) != IN_LOOPBACKNET) - abort (); - - ia = inet_makeaddr (IN_LOOPBACKNET, 1); - if (ia.s_addr != INADDR_LOOPBACK) - abort (); - - if ((semid = semget (IPC_PRIVATE, 1, IPC_CREAT | IPC_EXCL | SEM_R | SEM_A)) < 0) - abort (); - - su.val = 10; - - if (semctl (semid, 0, SETVAL, su) != 0) - abort (); - - if (semctl (semid, 0, GETVAL) != 10) - abort (); - - if (semctl (semid, 0, IPC_RMID) != 0) - abort (); - - return 0; -}