From 17d445953201af33b64e278caa974aeae05a2c95 Mon Sep 17 00:00:00 2001
From: Tomasz Konojacki <me@xenu.pl>
Date: Tue, 29 Oct 2019 17:33:00 +0100
Subject: remove CONSERVATIVE and LIBERAL

These constants were undocumented and don't do anything useful.
Saving a few kilobytes of memory doesn't justify the complexity
caused by adding a new build flag.

All platforms except 64-bit Windows were using LIBERAL. It's not
clear why win64 was using -DCONSERVATIVE, but removing it doesn't
break anything.

[gh #17232]
---
 doop.c | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

(limited to 'doop.c')

diff --git a/doop.c b/doop.c
index 9827bfcae1..a01fc04723 100644
--- a/doop.c
+++ b/doop.c
@@ -1005,11 +1005,9 @@ Perl_do_vecset(pTHX_ SV *sv)
 void
 Perl_do_vop(pTHX_ I32 optype, SV *sv, SV *left, SV *right)
 {
-#ifdef LIBERAL
     long *dl;
     long *ll;
     long *rl;
-#endif
     char *dc;
     STRLEN leftlen;
     STRLEN rightlen;
@@ -1115,7 +1113,6 @@ Perl_do_vop(pTHX_ I32 optype, SV *sv, SV *left, SV *right)
 	dc = SvPVX(sv);		/* sv_usepvn() calls Renew() */
     }
 
-#ifdef LIBERAL
     if (len >= sizeof(long)*4 &&
 	!(PTR2nat(dc) % sizeof(long)) &&
 	!(PTR2nat(lc) % sizeof(long)) &&
@@ -1160,7 +1157,7 @@ Perl_do_vop(pTHX_ I32 optype, SV *sv, SV *left, SV *right)
 
 	len = remainder;
     }
-#endif
+
     switch (optype) {
     case OP_BIT_AND:
         while (len--)
-- 
cgit v1.2.1