From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 27 May 2002 16:22:45 +0000 (+0000)
Subject: Missed from #16811.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=12a7e53ecaf2862097d42e6cd9b4de2e1b52eb5c;p=p5sagit%2Fp5-mst-13.2.git

Missed from #16811.

p4raw-id: //depot/perl@16812
---

diff --git a/MANIFEST b/MANIFEST
index 43f3043..ab5fc95 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -1946,9 +1946,11 @@ NetWare/bat/BldNWExt.bat	NetWare port
 NetWare/bat/Buildtype.bat	NetWare port
 NetWare/bat/CWbuild.bat		NetWare port
 NetWare/bat/MPKBuild.bat	NetWare port
+NetWare/bat/Setcw.bat		NetWare port
 NetWare/bat/Setmpksdk.bat	NetWare port
 NetWare/bat/Setnlmsdk.bat	NetWare port
 NetWare/bat/SetNWBld.bat	NetWare port
+NetWare/bat/SetNWDef.bat	NetWare port
 NetWare/bat/Setwatcom.bat	NetWare port
 NetWare/bat/ToggleD2.bat	NetWare port
 NetWare/bat/ToggleXDC.bat	NetWare port
@@ -1995,6 +1997,7 @@ NetWare/nwutil.h		NetWare port
 NetWare/nwvmem.h		NetWare port
 NetWare/perllib.cpp		NetWare port
 NetWare/splittree.pl		NetWare port
+NetWare/sv_nw.c			NetWare port
 NetWare/t/NWModify.pl		NetWare port
 NetWare/t/NWScripts.pl		NetWare port
 NetWare/t/Readme.txt		NetWare port
diff --git a/NetWare/sv_nw.c b/NetWare/sv_nw.c
new file mode 100644
index 0000000..0051363
--- /dev/null
+++ b/NetWare/sv_nw.c
@@ -0,0 +1,35 @@
+#include <EXTERN.h>
+#define PERL_IN_SV_C
+#include <perl.h>
+#include <regcomp.h>
+
+#define FCALL *f
+#define SV_CHECK_THINKFIRST(sv) if (SvTHINKFIRST(sv)) sv_force_normal(sv)
+
+
+
+void
+Perl_sv_catsv(pTHX_ SV *dstr, register SV *sstr)
+{
+    sv_catsv_flags(dstr, sstr, SV_GMAGIC);
+}
+
+void
+Perl_sv_catpvn(pTHX_ SV *dsv, const char* sstr, STRLEN slen)
+{
+    
+    sv_catpvn_flags(dsv, sstr, slen, SV_GMAGIC);
+}
+
+void
+Perl_sv_setsv(pTHX_ SV *dstr, register SV *sstr)
+{
+    sv_setsv_flags(dstr, sstr, SV_GMAGIC);
+}
+
+char *
+Perl_sv_2pv(pTHX_ register SV *sv, STRLEN *lp)
+{
+    return sv_2pv_flags(sv, lp, SV_GMAGIC);
+}
+