Skip to content

Commit a8aeb87

Browse files
committed
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
1 parent a83e740 commit a8aeb87

File tree

2 files changed

+2
-2
lines changed

2 files changed

+2
-2
lines changed

src/pl/tcl/expected/pltcl_setup.out

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -507,7 +507,7 @@ CREATE OPERATOR CLASS tcl_int4_ops
507507
create function tcl_date_week(int4,int4,int4) returns text as $$
508508
return [clock format [clock scan "$2/$3/$1"] -format "%U"]
509509
$$ language pltcl immutable;
510-
select tcl_date_week(2010,1,24);
510+
select tcl_date_week(2010,1,26);
511511
tcl_date_week
512512
---------------
513513
04

src/pl/tcl/sql/pltcl_setup.sql

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -557,7 +557,7 @@ create function tcl_date_week(int4,int4,int4) returns text as $$
557557
return [clock format [clock scan "$2/$3/$1"] -format "%U"]
558558
$$ language pltcl immutable;
559559

560-
select tcl_date_week(2010,1,24);
560+
select tcl_date_week(2010,1,26);
561561
select tcl_date_week(2001,10,24);
562562

563563
-- test pltcl event triggers

0 commit comments

Comments
 (0)