From d7e9371d3c5db3b4bfff8bd2765ff5aa843c2591 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Motiejus=20Jak=C5=A1tys?= <motiejus@uber.com>
Date: Sat, 1 May 2021 13:26:19 +0300
Subject: [PATCH] always order `wm_debug` by insertion time

---
 IV/init.sql  | 1 +
 IV/tests.sql | 8 ++++----
 IV/wm.sql    | 1 +
 3 files changed, 6 insertions(+), 4 deletions(-)

diff --git a/IV/init.sql b/IV/init.sql
index 32810fd..323b23a 100644
--- a/IV/init.sql
+++ b/IV/init.sql
@@ -6,6 +6,7 @@
 -- stage || '_' || name || ' gen:' || coalesce(gen, 'Ø') || ' nbend:' || lpad(nbend, 4, '0')
 drop table if exists wm_debug;
 create table wm_debug(
+  id serial,
   stage text not null,
   name text not null,
   gen bigint not null,
diff --git a/IV/tests.sql b/IV/tests.sql
index a6c011b..c7103f0 100644
--- a/IV/tests.sql
+++ b/IV/tests.sql
@@ -16,12 +16,12 @@ begin
 end $$ LANGUAGE plpgsql;
 
 drop function if exists dbg_geomsummary;
-create function dbg_geomsummary(geoms geometry[], OUT output text) as $$
+create function dbg_geomsummary(geoms geometry[]) returns void as $$
   declare i int4;
 begin
-  output = format('len: %s;', array_length(geoms, 1));
+  raise notice 'len: %', array_length(geoms, 1);
   for i in 1..array_length(geoms, 1) loop
-    output = output || format(' %s:%s;', i, st_astext(geoms[i]));
+    raise notice '%: %', lpad(i::text, 2, '0'), st_astext(geoms[i]);
   end loop;
 end
 $$ language plpgsql;
@@ -86,7 +86,7 @@ create function wm_debug_get(
 ) as $$
 declare
 begin
-  ways = array((select way from wm_debug where stage=_stage and name=_name));
+  ways = array((select way from wm_debug where stage=_stage and name=_name order by id));
 end $$ language plpgsql;
 
 do $$
diff --git a/IV/wm.sql b/IV/wm.sql
index c29acc6..3606a11 100644
--- a/IV/wm.sql
+++ b/IV/wm.sql
@@ -427,6 +427,7 @@ declare
 begin
   area_threshold = radians(180) * ((dhalfcircle/2)^2)/2;
   mutated = false;
+
   i = 1;
   while i < array_length(bendattrs, 1)-1 loop
     i = i + 1;