Changeset 8c59178 for perlglue.xs
- Timestamp:
- Mar 7, 2010, 10:26:02 PM (14 years ago)
- Branches:
- master, release-1.10, release-1.6, release-1.7, release-1.8, release-1.9
- Children:
- 5e5f08f
- Parents:
- 7ab0020
- git-author:
- Anders Kaseorg <andersk@mit.edu> (02/27/10 20:34:32)
- git-committer:
- Anders Kaseorg <andersk@mit.edu> (03/07/10 22:26:02)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perlglue.xs
r7ab0020 r8c59178 333 333 RETVAL = owl_new_av(&fl, (SV*(*)(const void*))owl_new_sv); 334 334 sv_2mortal((SV*)RETVAL); 335 owl_list_ free_all(&fl, owl_free);335 owl_list_cleanup(&fl, owl_free); 336 336 } 337 337 OUTPUT: … … 352 352 RETVAL 353 353 CLEANUP: 354 owl_list_ free_all(&l, owl_free);354 owl_list_cleanup(&l, owl_free); 355 355 356 356 … … 369 369 RETVAL 370 370 CLEANUP: 371 owl_list_ free_all(&l, owl_free);371 owl_list_cleanup(&l, owl_free); 372 372 373 373 … … 388 388 RETVAL 389 389 CLEANUP: 390 owl_list_ free_all(&l, owl_free);390 owl_list_cleanup(&l, owl_free); 391 391 392 392 void
Note: See TracChangeset
for help on using the changeset viewer.