Gentoo Archives: gentoo-commits

From: "TomAs Touceda (chiiph)" <chiiph@g.o>
To: gentoo-commits@l.g.o
Subject: [gentoo-commits] gentoo-x86 commit in dev-scheme/bigloo/files: bigloo-3.6a-fix_printf_format_warnings.patch
Date: Sun, 03 Apr 2011 00:00:56
Message-Id: 20110403000045.9853020057@flycatcher.gentoo.org
1 chiiph 11/04/03 00:00:45
2
3 Added: bigloo-3.6a-fix_printf_format_warnings.patch
4 Log:
5 Version bump
6
7 (Portage version: 2.2.0_alpha28/cvs/Linux i686)
8
9 Revision Changes Path
10 1.1 dev-scheme/bigloo/files/bigloo-3.6a-fix_printf_format_warnings.patch
11
12 file : http://sources.gentoo.org/viewvc.cgi/gentoo-x86/dev-scheme/bigloo/files/bigloo-3.6a-fix_printf_format_warnings.patch?rev=1.1&view=markup
13 plain: http://sources.gentoo.org/viewvc.cgi/gentoo-x86/dev-scheme/bigloo/files/bigloo-3.6a-fix_printf_format_warnings.patch?rev=1.1&content-type=text/plain
14
15 Index: bigloo-3.6a-fix_printf_format_warnings.patch
16 ===================================================================
17 Author: Jerry James <loganjerry <at> gmail.com>
18 Title: Patch for removing printf "warning: format" in bigloo source code
19 URL: http://article.gmane.org/gmane.lisp.scheme.bigloo/5112
20 --- api/gstreamer/src/Clib/bglgst.c.orig 2011-01-24 06:30:52.000000000 -0700
21 +++ api/gstreamer/src/Clib/bglgst.c 2011-02-14 15:24:29.464185149 -0700
22 @@ -93,12 +93,12 @@ bglgst_use_threadsp() {
23 /* bgl_gobject_boehm_alloc_init ... */
24 /*---------------------------------------------------------------------*/
25 static gpointer bgl_gst_alloc( gsize n ) {
26 - fprintf( stderr, "GC_MALLOC n=%d\n", n );
27 + fprintf( stderr, "GC_MALLOC n=%" G_GSIZE_FORMAT "\n", n );
28 return GC_MALLOC( n );
29 }
30
31 static gpointer bgl_gst_realloc( gpointer ptr, gsize n ) {
32 - fprintf( stderr, "GC_REALLOC ptr=%p n=%d\n", ptr, n );
33 + fprintf( stderr, "GC_REALLOC ptr=%p n=%" G_GSIZE_FORMAT "\n", ptr, n );
34 return GC_REALLOC( ptr, n );
35 }
36
37 @@ -297,7 +297,7 @@ bgl_g_value_to_obj( const GValue *gval,
38 case G_TYPE_ENUM: {
39 long obj = g_value_get_enum( gval );
40
41 - fprintf( stderr, "G_TYPE_ENUM not implemented yet %d (%s:%d)\n",
42 + fprintf( stderr, "G_TYPE_ENUM not implemented yet %ld (%s:%d)\n",
43 obj, __FILE__, __LINE__ );
44
45 return BUNSPEC;
46 --- runtime/Clib/capply.c.orig 2011-01-24 06:30:52.000000000 -0700
47 +++ runtime/Clib/capply.c 2011-02-14 15:04:59.255817644 -0700
48 @@ -627,7 +627,7 @@ obj_t apply( obj_t function, obj_t args_
49 default: {
50 char msg[ 128 ];
51 sprintf( msg,
52 - "too many arguments provided (%d) in apply (max 50)",
53 + "too many arguments provided (%ld) in apply (max 50)",
54 -arity );
55
56 C_SYSTEM_FAILURE( BGL_ERROR, "apply", msg, function );
57 @@ -1229,7 +1229,7 @@ obj_t apply( obj_t function, obj_t args_
58 default: {
59 char msg[ 128 ];
60 sprintf( msg,
61 - "too many arguments provided (%d) in apply (max 50)",
62 + "too many arguments provided (%ld) in apply (max 50)",
63 arity );
64
65 C_SYSTEM_FAILURE( BGL_ERROR, "apply", msg, function );
66 --- runtime/Clib/cstring.c.orig 2011-01-24 06:30:52.000000000 -0700
67 +++ runtime/Clib/cstring.c 2011-02-14 15:04:18.391856999 -0700
68 @@ -293,23 +293,23 @@ integer_to_string_padding( long x, long
69
70 case 8 :
71 if( x < 0 ) {
72 - sprintf( fmt, "-%%0%dlo", padding - 1 );
73 + sprintf( fmt, "-%%0%ldlo", padding - 1 );
74 } else {
75 - sprintf( fmt, "%%0%dlo", padding );
76 + sprintf( fmt, "%%0%ldlo", padding );
77 }
78 break;
79 case 16 :
80 if( x < 0 ) {
81 - sprintf( fmt, "-%%0%dlx", padding - 1);
82 + sprintf( fmt, "-%%0%ldlx", padding - 1);
83 } else {
84 - sprintf( fmt, "%%0%dlx", padding );
85 + sprintf( fmt, "%%0%ldlx", padding );
86 }
87 break;
88 default :
89 if( x < 0 ) {
90 - sprintf( fmt, "-%%0%dld", padding - 1 );
91 + sprintf( fmt, "-%%0%ldld", padding - 1 );
92 } else {
93 - sprintf( fmt, "%%0%dld", padding );
94 + sprintf( fmt, "%%0%ldld", padding );
95 }
96 break;
97 }
98 --- runtime/Clib/cerror.c.orig 2011-01-24 06:30:52.000000000 -0700
99 +++ runtime/Clib/cerror.c 2011-02-14 15:03:19.097168636 -0700
100 @@ -69,7 +69,7 @@ bgl_debug_typeof( obj_t obj ) {
101 obj_t
102 bgl_debug_header( obj_t obj ) {
103 fprintf( stderr, "obj=%p\n", obj );
104 - fprintf( stderr, " TAG_MASK=%d ", (((long)obj) & TAG_MASK) );
105 + fprintf( stderr, " TAG_MASK=%ld ", (((long)obj) & TAG_MASK) );
106 switch( (((long)obj) & TAG_MASK) ) {
107 case TAG_STRUCT: fprintf( stderr, "(TAG_STRUCT)\n" ); break;
108 case TAG_INT: fprintf( stderr, "(TAG_INT)\n" ); break;
109 @@ -96,7 +96,7 @@ bgl_debug_header( obj_t obj ) {
110 }
111
112 if( POINTERP( obj ) ) {
113 - fprintf( stderr, " TYPE=%d ", TYPE( obj ) );
114 + fprintf( stderr, " TYPE=%ld ", TYPE( obj ) );
115 switch( TYPE( obj ) ) {
116 case 0: fprintf( stderr, "(PAIR_TYPE) " ); break;
117 case 1: fprintf( stderr, "(STRING_TYPE) " ); break;
118 @@ -132,7 +132,7 @@ bgl_debug_header( obj_t obj ) {
119 else
120 fprintf( stderr, "(unknown type) " );
121 }
122 - fprintf( stderr, "HEADER_SIZE=%d\n", HEADER_SIZE( CREF( obj )->header ) );
123 + fprintf( stderr, "HEADER_SIZE=%ld\n", HEADER_SIZE( CREF( obj )->header ) );
124 }
125
126 return obj;
127 --- runtime/Clib/ccontrol.c.orig 2011-01-24 06:30:52.000000000 -0700
128 +++ runtime/Clib/ccontrol.c 2011-02-14 15:07:40.999882828 -0700
129 @@ -200,9 +200,9 @@ bgl_procedure_entry_to_string( obj_t pro
130 obj_t res = make_string_sans_fill( 17 );
131
132 if( VA_PROCEDUREP( proc ) ) {
133 - sprintf( BSTRING_TO_STRING( res ), "%016x", PROCEDURE_VA_ENTRY( proc ) );
134 + sprintf( BSTRING_TO_STRING( res ), "%016lx", (long)PROCEDURE_VA_ENTRY( proc ) );
135 } else {
136 - sprintf( BSTRING_TO_STRING( res ), "%016x", PROCEDURE_ENTRY( proc ) );
137 + sprintf( BSTRING_TO_STRING( res ), "%016lx", (long)PROCEDURE_ENTRY( proc ) );
138 }
139
140 return res;
141 --- bde/bmem/lib/thread.c.orig 2011-01-24 06:30:51.000000000 -0700
142 +++ bde/bmem/lib/thread.c 2011-02-14 15:18:41.127937649 -0700
143 @@ -50,9 +50,9 @@ bglthread_switch( void *this, void *next
144 void
145 thread_dump_statistics( FILE *f ) {
146 if( context_switches || scheduler_awake ) {
147 - fprintf( f, " (thread (context-switches %d) (scheduler-awake %d))\n",
148 + fprintf( f, " (thread (context-switches %ld) (scheduler-awake %ld))\n",
149 context_switches, scheduler_awake );
150 - fprintf( stderr, "thread...(context switches=%d, scheduler awake=%d)\n",
151 + fprintf( stderr, "thread...(context switches=%ld, scheduler awake=%ld)\n",
152 context_switches,
153 scheduler_awake );
154 }
155 --- bde/bmem/lib/alloc.c.orig 2011-01-24 06:30:52.000000000 -0700
156 +++ bde/bmem/lib/alloc.c 2011-02-14 15:10:55.176083686 -0700
157 @@ -109,7 +109,7 @@ alloc_dump_type( pa_pair_t *i, FILE *f )
158 /*---------------------------------------------------------------------*/
159 void
160 alloc_dump( fun_alloc_info_t *i, FILE *f ) {
161 - fprintf( f, " (%d %d %d\n", i->gc_num,
162 + fprintf( f, " (%lu %lu %lu\n", i->gc_num,
163 BMEMSIZE( i->dsize ), BMEMSIZE( i->isize ) );
164 fprintf( f, " (dtype" );
165 for_each( (void (*)(void *, void *))alloc_dump_type, i->dtypes, f );
166 @@ -486,7 +486,7 @@ GC_malloc( size_t lb ) {
167
168 #if BMEMDEBUG
169 if( bmem_debug ) {
170 - fprintf( stderr, "GC_malloc(%d): %s %d\n",
171 + fprintf( stderr, "GC_malloc(%zu): %s %d\n",
172 lb, bgl_debug_trace_top_name(), get_alloc_type() );
173 }
174 #endif
175 @@ -513,7 +513,7 @@ GC_realloc( obj_t old, size_t lb ) {
176
177 #if BMEMDEBUG
178 if( bmem_debug ) {
179 - fprintf( stderr, "GC_realloc(%d): top=%s type=%d\n",
180 + fprintf( stderr, "GC_realloc(%zu): top=%s type=%d\n",
181 lb, bgl_debug_trace_top_name(), get_alloc_type() );
182 }
183 #endif
184 @@ -541,7 +541,7 @@ GC_malloc_atomic( size_t lb ) {
185
186 #if BMEMDEBUG
187 if( bmem_debug ) {
188 - fprintf( stderr, "GC_malloc_atomic(%d): top=%s type=%d\n",
189 + fprintf( stderr, "GC_malloc_atomic(%zu): top=%s type=%d\n",
190 lb, bgl_debug_trace_top_name(), get_alloc_type() );
191 }
192 #endif
193 @@ -623,7 +623,7 @@ BGl_registerzd2classz12zc0zz__objectz00(
194 hash, def,
195 constructor, virt );
196
197 - fprintf( stderr, "ok\n", cname );
198 + fprintf( stderr, "ok\n" );
199
200 return class;
201 }
202 --- bde/bmem/lib/symbol.c.orig 2011-01-24 06:30:51.000000000 -0700
203 +++ bde/bmem/lib/symbol.c 2011-02-14 15:13:47.727927175 -0700
204 @@ -33,7 +33,7 @@ make_symbol( obj_t name ) {
205
206 #if BMEMDEBUG
207 if( bmem_debug > 1 ) {
208 - fprintf( stderr, "make_symbol: %s %p\n", name, symbol );
209 + fprintf( stderr, "make_symbol: %s %p\n", BSTRING_TO_STRING( name ), symbol );
210 }
211 #endif
212 symbol->symbol_t.header = MAKE_HEADER( SYMBOL_TYPE, SYMBOL_SIZE );
213 --- bde/bmem/lib/trace.c.orig 2011-01-24 06:30:52.000000000 -0700
214 +++ bde/bmem/lib/trace.c 2011-02-14 15:17:49.472275324 -0700
215 @@ -79,9 +79,9 @@ bgl_debug_trace_top() {
216 fprintf( stderr, " top->name=KEYWORD %p\n", top->name );
217 } else {
218 if( !POINTERP( top->name ) ) {
219 - fprintf( stderr, " top->name=pas pointer %d\n", top->name );
220 + fprintf( stderr, " top->name=pas pointer %p\n", top->name );
221 } else {
222 - fprintf( stderr, " top->name=pointer %p\n", TYPE( top->name ) );
223 + fprintf( stderr, " top->name=pointer %ld\n", TYPE( top->name ) );
224 }
225 }
226 }
227 --- bde/bmem/lib/gchook.c.orig 2011-01-24 06:30:52.000000000 -0700
228 +++ bde/bmem/lib/gchook.c 2011-02-14 15:12:29.119566199 -0700
229 @@ -45,13 +45,13 @@ GC_collect_hook( int heapsz, long livesz
230 gc_number++;
231
232 if( heapsz > (1024 * 1024) ) {
233 - fprintf( stderr, "gc %3d: alloc size=%.2fMB, heap size=%.2fMB, live size=%.2fMB\n",
234 + fprintf( stderr, "gc %3lu: alloc size=%.2fMB, heap size=%.2fMB, live size=%.2fMB\n",
235 gc_number,
236 ((double)gc_alloc_size / (1024. * 1024.)),
237 ((double)heapsz / (1024. * 1024.)),
238 ((double)livesz / (1024. * 1024.)) );
239 } else {
240 - fprintf( stderr, "gc %3d: alloc size=%dKB, heap size=%dKB, live size=%ldKB\n",
241 + fprintf( stderr, "gc %3lu: alloc size=%luKB, heap size=%dKB, live size=%ldKB\n",
242 gc_number,
243 gc_alloc_size / 1024,
244 heapsz / 1024,
245 @@ -81,7 +81,7 @@ gc_alloc_size_add( int size ) {
246 /*---------------------------------------------------------------------*/
247 static void
248 GC_dump_gc( gc_info_t *i, FILE *f ) {
249 - fprintf( f, " (%d %d %d %d)\n",
250 + fprintf( f, " (%lu %lu %lu %lu)\n",
251 i->number,
252 BMEMSIZE( i->alloc_size ),
253 BMEMSIZE( i->heap_size ),