postgres.git / summary / log / commit / refs

commit    dd2d437e8ee760040163fd27722a57a818f32d72
Author:   Tom Lane <tgl@sss.pgh.pa.us>
Date:     Sun Feb 19 21:14:52 2017 +0000

    Adjust PL/Tcl regression test to dodge a possible bug or zone dependency.
    
    One case in the PL/Tcl tests is observed to fail on RHEL5 with a Turkish
    time zone setting.  It's not clear if this is an old Tcl bug or something
    odd about the zone data, but in any case that test is meant to see if the
    Tcl [clock] command works at all, not what its corner-case behaviors are.
    Therefore we have no need to test exactly which week a Sunday midnight is
    considered to fall into.  Probe the following Tuesday instead.
    
    Discussion: https://postgr.es/m/797.1487517822@sss.pgh.pa.us


 src/pl/tcl/expected/pltcl_setup.out | 2 +-
 src/pl/tcl/sql/pltcl_setup.sql      | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/pl/tcl/expected/pltcl_setup.out b/src/pl/tcl/expected/pltcl_setup.out
index 4183c14b28a..49b0893c707 100644
--- a/src/pl/tcl/expected/pltcl_setup.out
+++ b/src/pl/tcl/expected/pltcl_setup.out
@@ -507,7 +507,7 @@ CREATE OPERATOR CLASS tcl_int4_ops
 create function tcl_date_week(int4,int4,int4) returns text as $$
     return [clock format [clock scan "$2/$3/$1"] -format "%U"]
 $$ language pltcl immutable;
-select tcl_date_week(2010,1,24);
+select tcl_date_week(2010,1,26);
  tcl_date_week 
 ---------------
  04
diff --git a/src/pl/tcl/sql/pltcl_setup.sql b/src/pl/tcl/sql/pltcl_setup.sql
index 84629963229..44d69b5e24e 100644
--- a/src/pl/tcl/sql/pltcl_setup.sql
+++ b/src/pl/tcl/sql/pltcl_setup.sql
@@ -557,7 +557,7 @@ create function tcl_date_week(int4,int4,int4) returns text as $$
     return [clock format [clock scan "$2/$3/$1"] -format "%U"]
 $$ language pltcl immutable;
 
-select tcl_date_week(2010,1,24);
+select tcl_date_week(2010,1,26);
 select tcl_date_week(2001,10,24);
 
 -- test pltcl event triggers


[parent: 595c41276044]