diff options
Diffstat (limited to 'www/p5-HTML-Template-JIT/files/5.005-JIT-Compiler.pm')
| -rw-r--r-- | www/p5-HTML-Template-JIT/files/5.005-JIT-Compiler.pm | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/www/p5-HTML-Template-JIT/files/5.005-JIT-Compiler.pm b/www/p5-HTML-Template-JIT/files/5.005-JIT-Compiler.pm deleted file mode 100644 index 0b1f011e076e..000000000000 --- a/www/p5-HTML-Template-JIT/files/5.005-JIT-Compiler.pm +++ /dev/null @@ -1,21 +0,0 @@ ---- JIT/Compiler.pm~ Fri May 7 12:58:37 2004 -+++ JIT/Compiler.pm Fri May 7 12:58:39 2004 -@@ -87,6 +87,18 @@ - use Inline C => Config => OPTIMIZE => "$optimize", DIRECTORY => "$self->{package_dir}" $inline_debug; - use Inline C => <<'CODE_END'; - -+#ifndef SvPV_nolen -+# define SvPV_nolen(sv) ((SvFLAGS(sv) & (SVf_POK)) == SVf_POK ? SvPVX(sv) : sv_2pv_nolen(sv)) -+ static char * -+ sv_2pv_nolen(register SV *sv) -+ { -+ STRLEN n_a; -+ return sv_2pv(sv, &n_a); -+ } -+#endif -+ -+#define get_hv(name,create) perl_get_hv(name,create) -+ - END - - # print out code |