The R Project SVN R

Rev

Rev 85115 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 85115 Rev 85117
Line 46... Line 46...
46
	int (*fcb) (char *, size_t);
46
	int (*fcb) (char *, size_t);
47
	size_t size = 64;
47
	size_t size = 64;
48
	char *name = NULL;
48
	char *name = NULL;
49
 
49
 
50
#ifdef __clang__
50
#ifdef __clang__
51
#pragma clang diagnostic push
51
# pragma clang diagnostic push
52
#pragma clang diagnostic ignored "-Wpedantic"
52
# pragma clang diagnostic ignored "-Wpedantic"
-
 
53
#elif defined __GNUC__
-
 
54
# pragma GCC diagnostic push
-
 
55
# pragma GCC diagnostic ignored "-Wpedantic"	
53
#endif
56
#endif
54
	/* ISO C forbids assignment between function pointer and 'void *',
57
	/* ISO C forbids assignment between function pointer and 'void *',
55
	   but this is how dlsym() returns a function pointer. */
58
	   but this is how dlsym() returns a function pointer. */
56
	fcb = fcb_addr;
59
	fcb = fcb_addr;
57
#ifdef __clang__
60
#ifdef __clang__
58
#pragma clang diagnostic pop
61
# pragma clang diagnostic pop
-
 
62
#elif defined __GNUC__
-
 
63
# pragma GCC diagnostic pop
59
#endif
64
#endif
60
	for(;;) {
65
	for(;;) {
61
	    if (name)
66
	    if (name)
62
		free(name);
67
		free(name);
63
	    size *= 2;
68
	    size *= 2;