From 22c35a8c2392967a5ba6b5370695be464bd7012c Mon Sep 17 00:00:00 2001 From: Gurusamy Sarathy Date: Fri, 30 Oct 1998 02:51:39 +0000 Subject: phase 1 of somewhat major rearrangement of PERL_OBJECT stuff (objpp.h is gone, embed.pl now does some of that); objXSUB.h should soon be automated also; the global variables that escaped the PL_foo conversion are now reined in; renamed MAGIC in regcomp.h to REG_MAGIC to avoid collision with the type of same name; duplicated lists of pp_things in various places is now gone; result has only been tested on win32 p4raw-id: //depot/perl@2133 --- perlvars.h | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) (limited to 'perlvars.h') diff --git a/perlvars.h b/perlvars.h index d42353df51..17924a9154 100644 --- a/perlvars.h +++ b/perlvars.h @@ -10,7 +10,7 @@ * and how they're initialized. * * The 'G' prefix is only needed for vars that need appropriate #defines - * generated when built with or without EMBED. It is also used to generate + * generated in embed*.h. Such symbols are also used to generate * the appropriate export list for win32. * * Avoid build-specific #ifdefs here, like DEBUGGING. That way, @@ -70,11 +70,7 @@ PERLVAR(Ghe_root, HE *) /* free he list--shared by interpreters */ PERLVAR(Gnice_chunk, char *) /* a nice chunk of memory to reuse */ PERLVAR(Gnice_chunk_size, U32) /* how nice the chunk of memory is */ -#ifdef PERL_OBJECT PERLVARI(Grunops, runops_proc_t, FUNC_NAME_TO_PTR(RUNOPS_DEFAULT)) -#else -PERLVARI(Grunops, runops_proc_t *, RUNOPS_DEFAULT) -#endif PERLVAR(Gtokenbuf[256], char) PERLVAR(Gna, STRLEN) /* for use in SvPV when length is -- cgit v1.2.1