Skip to content

Commit

Permalink
Back out test for return count from pg_select
Browse files Browse the repository at this point in the history
  • Loading branch information
resuna committed Mar 16, 2018
1 parent 125ba57 commit ebc6cf0
Showing 1 changed file with 1 addition and 27 deletions.
28 changes: 1 addition & 27 deletions tests/pgtcl.test
Original file line number Diff line number Diff line change
Expand Up @@ -911,33 +911,7 @@ test pgtcl-7.5 {using pg_select with embedded variables} -body {
#
#
#
test pgtcl-7.6 {return value of pg_select} -body {

unset -nocomplain res

set conn [pg::connect -connlist [array get ::conninfo]]

set names {}

set count [pg::select $conn "SELECT relname FROM Pg_class LIMIT 5" resultArr {
set headers $resultArr(.headers)
set numcols $resultArr(.numcols)
set tupno $resultArr(.tupno)

lappend names $resultArr(relname)

}]

rename $conn {}

list [llength $names] $count

} -result {5 5}

#
#
#
test pgtcl-7.7 {pg_select -count} -body {
test pgtcl-7.6 {pg_select -count} -body {

unset -nocomplain res

Expand Down

0 comments on commit ebc6cf0

Please sign in to comment.