From 82fdcfb75eaf575336796308c22f969a6e5257fa Mon Sep 17 00:00:00 2001
From: Ben Pfaff <blp@cs.stanford.edu>
Date: Wed, 15 Dec 2021 18:55:44 -0800
Subject: [PATCH] perl-module: Fix build errors and ignore warnings.

This allows the module to build again, for me.
---
 perl-module/PSPP.xs     | 7 ++++---
 perl-module/automake.mk | 2 +-
 2 files changed, 5 insertions(+), 4 deletions(-)

diff --git a/perl-module/PSPP.xs b/perl-module/PSPP.xs
index aaa4299f03..0b7dce1ddf 100644
--- a/perl-module/PSPP.xs
+++ b/perl-module/PSPP.xs
@@ -157,7 +157,7 @@ value_to_scalar (const union value *val, const struct variable *var)
   else
     {
       int width = var_get_width (var);
-      return newSVpvn (val->s, width);
+      return newSVpvn ((char *) val->s, width);
     }
 }
 
@@ -208,7 +208,8 @@ CODE:
  assert (0 == strncmp (ver, bare_version, strlen (ver)));
 
  i18n_init ();
- msg_set_handler (message_handler, NULL);
+const struct msg_handler mh = { .output_msg = message_handler };
+ msg_set_handler (&mh);
  settings_init ();
  fh_init ();
 
@@ -785,7 +786,7 @@ get_case_cnt (sfr)
  struct sysreader_info *sfr;
 CODE:
  SV *ret;
- casenumber n = casereader_get_case_cnt (sfr->reader);
+ casenumber n = casereader_get_n_cases (sfr->reader);
  if (n == CASENUMBER_MAX)
   ret = &PL_sv_undef;
  else
diff --git a/perl-module/automake.mk b/perl-module/automake.mk
index 96e24acde4..d9e0882006 100644
--- a/perl-module/automake.mk
+++ b/perl-module/automake.mk
@@ -46,7 +46,7 @@ perl-module/Makefile: perl-module/MakefileX
 
 perl-module/MakefileX: perl-module/Makefile.PL perl-module/pspp-module-config $(module_sources)
 	$(AM_V_GEN)cd perl-module && $(PERL) Makefile.PL PREFIX=$(prefix) \
-                                                         OPTIMIZE="$(CFLAGS) $(CPPFLAGS)" \
+                                                         OPTIMIZE="$(CFLAGS) $(CPPFLAGS) -Wno-error" \
                                                          LD="`$(PERL) -e 'use Config::Perl::V;print Config::Perl::V::myconfig()->{config}{ld};'` $(LDFLAGS)"
 
 perl-module/PSPP-Perl-$(VERSION_FOR_PERL).tar.gz: $(module_sources) perl-module/Makefile
-- 
2.30.2