[svn:mod_parrot] r248 - mod_parrot/trunk/src
[email protected] Tue, 11 Sep 2007 08:12:38 -0700 (PDT)
Newsgroups
perl.cvs.mod_parrot
Message-ID
<[email protected] >
Author: jhorwitz
Date: Tue Sep 11 08:12:37 2007
New Revision: 248
Modified:
mod_parrot/trunk/src/parrot_util.c
Log:
remove deprecated initialization and packfile API calls
Modified: mod_parrot/trunk/src/parrot_util.c
==============================================================================
--- mod_parrot/trunk/src/parrot_util.c (original)
+++ mod_parrot/trunk/src/parrot_util.c Tue Sep 11 08:12:37 2007
@@ -43,17 +43,7 @@
struct PackFile_Segment *seg;
interp = Parrot_new(NULL);
-#if 0
- Parrot_init(interp);
-#endif
imcc_init(interp);
-#if 0
- pf = PackFile_new(interp, 0);
- seg = PackFile_Segment_new_seg(interp, &pf->directory, PF_BYTEC_SEG,
- "mod_parrot_code", 1);
- pf->cur_cs = (struct PackFile_ByteCode *)seg;
- Parrot_loadbc(interp, pf);
-#endif
pf = PackFile_new_dummy(interp, "mod_parrot_code");
return(interp);
}