blob: d0cfaad36bf3c1cdaf1b8dfcb6dea5f5eec19b38 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
$NetBSD: patch-aa,v 1.1.1.1 2001/02/27 23:39:55 jtb Exp $
--- BibTeX.xs~ Wed Oct 6 14:56:46 1999
+++ BibTeX.xs Fri Sep 15 23:49:59 2000
@@ -29,6 +29,8 @@
#include "perl.h"
#include "XSUB.h"
+#define na PL_na
+
#define BT_DEBUG 0
#include "btparse.h"
@@ -49,7 +51,7 @@
if (constant(name, &i))
ST(0) = sv_2mortal(newSViv(i));
else
- ST(0) = &sv_undef;
+ ST(0) = &PL_sv_undef;
MODULE = Text::BibTeX PACKAGE = Text::BibTeX PREFIX = bt_
@@ -96,7 +98,7 @@
for (i = 0; i < names->num_items; i++)
{
if (names->items[i] == NULL)
- sv_name = &sv_undef;
+ sv_name = &PL_sv_undef;
else
sv_name = sv_2mortal (newSVpv (names->items[i], 0));
|