From e282afdd60e4ab2fe3db7a7e07de196b0f0477e8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Wed, 3 May 2000 20:17:52 -0700
Subject: [PATCH] minor optimization

Rev: src/builtin_functions.c:1.270
---
 src/builtin_functions.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/builtin_functions.c b/src/builtin_functions.c
index 9b63265beb..44e5ca7a06 100644
--- a/src/builtin_functions.c
+++ b/src/builtin_functions.c
@@ -5,7 +5,7 @@
 \*/
 /**/
 #include "global.h"
-RCSID("$Id: builtin_functions.c,v 1.269 2000/04/30 11:05:08 grubba Exp $");
+RCSID("$Id: builtin_functions.c,v 1.270 2000/05/04 03:17:52 hubbe Exp $");
 #include "interpret.h"
 #include "svalue.h"
 #include "pike_macros.h"
@@ -2722,7 +2722,7 @@ void f_column(INT32 args)
   get_all_args("column", args, "%a%*", &tmp, &val);
 
   /* Optimization */
-  if(tmp->refs == 1)
+  if(tmp->refs == 1 || ~(tmp->type_field & BIT_COMPLEX))
   {
     /* An array with one ref cannot possibly be cyclic */
     struct svalue sval;
-- 
GitLab