Mercurial > hg > xemacs-beta

comparison src/tests.c @ 1726:a8d8f419b459

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-09-30 15:26:34 by james] Add type information to xfree to avoid alias creation.
author james
date Tue, 30 Sep 2003 15:27:01 +0000
parents 804517e16990
children 04bc9d2f42c7
comparison
equal deleted inserted replaced
1725:7ff8f4d70aec 1726:a8d8f419b459
129 ptr = NULL, len = rand(); 129 ptr = NULL, len = rand();
130 TO_EXTERNAL_FORMAT (DATA, (int_latin2, sizeof (int_latin2) - 1), 130 TO_EXTERNAL_FORMAT (DATA, (int_latin2, sizeof (int_latin2) - 1),
131 MALLOC, (ptr, len), 131 MALLOC, (ptr, len),
132 intern ("iso-8859-2")); 132 intern ("iso-8859-2"));
133 DFC_CHECK_DATA (ptr, len, ext_latin); 133 DFC_CHECK_DATA (ptr, len, ext_latin);
134 xfree (ptr); 134 xfree (ptr, void *);
135 135
136 TO_EXTERNAL_FORMAT (DATA, (int_latin2, sizeof (int_latin2) - 1), 136 TO_EXTERNAL_FORMAT (DATA, (int_latin2, sizeof (int_latin2) - 1),
137 LISP_OPAQUE, opaque, 137 LISP_OPAQUE, opaque,
138 intern ("iso-8859-2")); 138 intern ("iso-8859-2"));
139 DFC_CHECK_DATA (XOPAQUE_DATA (opaque), XOPAQUE_SIZE (opaque), ext_latin); 139 DFC_CHECK_DATA (XOPAQUE_DATA (opaque), XOPAQUE_SIZE (opaque), ext_latin);
147 ptr = NULL, len = rand(); 147 ptr = NULL, len = rand();
148 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin) - 1), 148 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin) - 1),
149 MALLOC, (ptr, len), 149 MALLOC, (ptr, len),
150 intern ("iso-8859-2")); 150 intern ("iso-8859-2"));
151 DFC_CHECK_DATA (ptr, len, int_latin2); 151 DFC_CHECK_DATA (ptr, len, int_latin2);
152 xfree (ptr); 152 xfree (ptr, void *);
153 153
154 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin) - 1), 154 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin) - 1),
155 LISP_STRING, string, 155 LISP_STRING, string,
156 intern ("iso-8859-2")); 156 intern ("iso-8859-2"));
157 DFC_CHECK_DATA (XSTRING_DATA (string), XSTRING_LENGTH (string), int_latin2); 157 DFC_CHECK_DATA (XSTRING_DATA (string), XSTRING_LENGTH (string), int_latin2);
231 ptr = NULL, len = rand(); 231 ptr = NULL, len = rand();
232 TO_EXTERNAL_FORMAT (DATA, (int_latin1, sizeof (int_latin1) - 1), 232 TO_EXTERNAL_FORMAT (DATA, (int_latin1, sizeof (int_latin1) - 1),
233 MALLOC, (ptr, len), 233 MALLOC, (ptr, len),
234 Qbinary); 234 Qbinary);
235 DFC_CHECK_DATA_COND_MULE (ptr, len, ext_latin, int_latin1); 235 DFC_CHECK_DATA_COND_MULE (ptr, len, ext_latin, int_latin1);
236 xfree (ptr); 236 xfree (ptr, void *);
237 237
238 ptr = NULL, len = rand(); 238 ptr = NULL, len = rand();
239 TO_EXTERNAL_FORMAT (DATA, (int_latin2, sizeof (int_latin2)), 239 TO_EXTERNAL_FORMAT (DATA, (int_latin2, sizeof (int_latin2)),
240 MALLOC, (ptr, len), 240 MALLOC, (ptr, len),
241 Qbinary); 241 Qbinary);
242 DFC_CHECK_DATA_COND_MULE_NUL (ptr, len, ext_tilde, int_latin2); 242 DFC_CHECK_DATA_COND_MULE_NUL (ptr, len, ext_tilde, int_latin2);
243 xfree (ptr); 243 xfree (ptr, void *);
244 244
245 ptr = NULL, len = rand(); 245 ptr = NULL, len = rand();
246 TO_EXTERNAL_FORMAT (DATA, (int_latin1, sizeof (int_latin1) - 1), 246 TO_EXTERNAL_FORMAT (DATA, (int_latin1, sizeof (int_latin1) - 1),
247 MALLOC, (ptr, len), 247 MALLOC, (ptr, len),
248 intern ("iso-8859-1")); 248 intern ("iso-8859-1"));
249 DFC_CHECK_DATA_COND_MULE (ptr, len, ext_latin, int_latin1); 249 DFC_CHECK_DATA_COND_MULE (ptr, len, ext_latin, int_latin1);
250 xfree (ptr); 250 xfree (ptr, void *);
251 251
252 TO_EXTERNAL_FORMAT (DATA, (int_latin1, sizeof (int_latin1) - 1), 252 TO_EXTERNAL_FORMAT (DATA, (int_latin1, sizeof (int_latin1) - 1),
253 LISP_OPAQUE, opaque, 253 LISP_OPAQUE, opaque,
254 Qbinary); 254 Qbinary);
255 DFC_CHECK_DATA_COND_MULE (XOPAQUE_DATA (opaque), 255 DFC_CHECK_DATA_COND_MULE (XOPAQUE_DATA (opaque),
282 ptr = NULL, len = rand(); 282 ptr = NULL, len = rand();
283 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin)), 283 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin)),
284 MALLOC, (ptr, len), 284 MALLOC, (ptr, len),
285 intern ("iso-8859-1")); 285 intern ("iso-8859-1"));
286 DFC_CHECK_DATA_COND_MULE_NUL (ptr, len, int_latin1, ext_latin); 286 DFC_CHECK_DATA_COND_MULE_NUL (ptr, len, int_latin1, ext_latin);
287 xfree (ptr); 287 xfree (ptr, void *);
288 288
289 ptr = NULL, len = rand(); 289 ptr = NULL, len = rand();
290 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin)), 290 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin)),
291 MALLOC, (ptr, len), 291 MALLOC, (ptr, len),
292 Qnil); 292 Qnil);
293 DFC_CHECK_DATA_COND_MULE_NUL (ptr, len, int_latin1, ext_latin); 293 DFC_CHECK_DATA_COND_MULE_NUL (ptr, len, int_latin1, ext_latin);
294 xfree (ptr); 294 xfree (ptr, void *);
295 295
296 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin) - 1), 296 TO_INTERNAL_FORMAT (DATA, (ext_latin, sizeof (ext_latin) - 1),
297 LISP_STRING, string, 297 LISP_STRING, string,
298 intern ("iso-8859-1")); 298 intern ("iso-8859-1"));
299 DFC_CHECK_DATA_COND_MULE (XSTRING_DATA (string), 299 DFC_CHECK_DATA_COND_MULE (XSTRING_DATA (string),
315 ptr = NULL, len = rand(); 315 ptr = NULL, len = rand();
316 TO_EXTERNAL_FORMAT (DATA, (int_foo, sizeof (int_foo)), 316 TO_EXTERNAL_FORMAT (DATA, (int_foo, sizeof (int_foo)),
317 MALLOC, (ptr, len), 317 MALLOC, (ptr, len),
318 Qbinary); 318 Qbinary);
319 DFC_CHECK_DATA_COND_EOL_NUL (ptr, len, ext_unix, int_foo); 319 DFC_CHECK_DATA_COND_EOL_NUL (ptr, len, ext_unix, int_foo);
320 xfree (ptr); 320 xfree (ptr, void *);
321 321
322 ptr = NULL, len = rand(); 322 ptr = NULL, len = rand();
323 TO_EXTERNAL_FORMAT (DATA, (int_foo, sizeof (int_foo) - 1), 323 TO_EXTERNAL_FORMAT (DATA, (int_foo, sizeof (int_foo) - 1),
324 LISP_OPAQUE, opaque, 324 LISP_OPAQUE, opaque,
325 intern ("raw-text-mac")); 325 intern ("raw-text-mac"));
341 ptr = NULL, len = rand(); 341 ptr = NULL, len = rand();
342 TO_EXTERNAL_FORMAT (LISP_STRING, string_foo, 342 TO_EXTERNAL_FORMAT (LISP_STRING, string_foo,
343 MALLOC, (ptr, len), 343 MALLOC, (ptr, len),
344 intern ("no-conversion-mac")); 344 intern ("no-conversion-mac"));
345 DFC_CHECK_DATA_COND_EOL (ptr, len, ext_mac, int_foo); 345 DFC_CHECK_DATA_COND_EOL (ptr, len, ext_mac, int_foo);
346 xfree (ptr); 346 xfree (ptr, void *);
347 347
348 ptr = NULL, len = rand(); 348 ptr = NULL, len = rand();
349 TO_EXTERNAL_FORMAT (DATA, (int_foo, sizeof (int_foo) - 1), 349 TO_EXTERNAL_FORMAT (DATA, (int_foo, sizeof (int_foo) - 1),
350 ALLOCA, (ptr, len), 350 ALLOCA, (ptr, len),
351 intern ("no-conversion-dos")); 351 intern ("no-conversion-dos"));