From 573444bfc2940c43a6109095813c8e35d12f425b Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 23 Nov 2018 20:09:58 +0000
Subject: [PATCH] distort-stl: slight rework to make debug output better

Calculation ordering changed but answers should be the same.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 distort-stl | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/distort-stl b/distort-stl
index bdbdd49..6dcd23c 100755
--- a/distort-stl
+++ b/distort-stl
@@ -68,9 +68,8 @@ sub maybe_subdivide_triangle ($$$$) {
 	    }
 	    # triangle i-j-k, splitting edge i-m
 	    # gives    i-m-k, k-m-j
-	    push @$changed,
-		[ $t->[$ix], \@midp, $t->[$kx] ],
-		[ $t->[$kx], \@midp, $t->[$jx] ];
+	    my $n = [ @$t ]; $n->[$ix] = \@midp; unshift @$changed, $n;
+	    my $n = [ @$t ]; $n->[$jx] = \@midp; unshift @$changed, $n;
 	    return;
 	}
     }
-- 
2.30.2