File: pecl_bug6109.phpt

package info (click to toggle)
php5 5.6.7%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie-kfreebsd
  • size: 150,376 kB
  • sloc: ansic: 727,510; php: 21,966; sh: 12,356; cpp: 8,763; xml: 6,105; yacc: 1,551; exp: 1,514; makefile: 1,461; pascal: 1,048; awk: 538; perl: 315; sql: 22
file content (40 lines) | stat: -rw-r--r-- 629 bytes parent folder | download | duplicates (8)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
--TEST--
PECL Bug #6109 (Error messages not kept)
--SKIPIF--
<?php if (!extension_loaded('oci8')) die ("skip no oci8 extension"); ?>
--FILE--
<?php

require(dirname(__FILE__).'/connect.inc');

// Run Test

echo "Test 1\n";

$s = oci_parse($c, 'delete from table_does_not_exist');
$r = @oci_execute($s);

if ($r) {
	echo "whoops - table does exist\n";
} else {
	for ($i = 0; $i < 5; $i++) {
		$err = oci_error($s);
		echo ($i) .' -> '.$err['message'] ."\n";
	}
}

// Cleanup

oci_close($c);

echo "Done\n";

?>
--EXPECTF--
Test 1
0 -> ORA-00942: %s
1 -> ORA-00942: %s
2 -> ORA-00942: %s
3 -> ORA-00942: %s
4 -> ORA-00942: %s
Done