From 1b16977c1b4604968437cd31bb8b5c7b37ab12d9 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Mon, 27 Mar 2000 02:17:06 +0200
Subject: [PATCH] Returning of void expressions is not portable.
Rev: src/modules/Perl/perlmod.c:1.15
---
src/modules/Perl/perlmod.c | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/src/modules/Perl/perlmod.c b/src/modules/Perl/perlmod.c
index 31afbc33ba..d437376b38 100644
--- a/src/modules/Perl/perlmod.c
+++ b/src/modules/Perl/perlmod.c
@@ -1,4 +1,4 @@
-/* $Id: perlmod.c,v 1.14 2000/03/23 21:48:38 leif Exp $ */
+/* $Id: perlmod.c,v 1.15 2000/03/27 00:17:06 grubba Exp $ */
#include "builtin_functions.h"
#include "global.h"
@@ -431,10 +431,10 @@ static void _perlmod_eval(INT32 args, int perlflags)
}
static void perlmod_eval(INT32 args)
- { return _perlmod_eval(args, G_SCALAR);}
+ { _perlmod_eval(args, G_SCALAR); }
static void perlmod_eval_list(INT32 args)
- { return _perlmod_eval(args, G_ARRAY);}
+ { _perlmod_eval(args, G_ARRAY); }
static void _perlmod_call(INT32 args, int perlflags)
{ PerlInterpreter *p = PERL;
--
GitLab