PAL.C.T MINI SHELL
--TEST--
Constant arrays
--INI--
zend.enable_gc=1
--FILE--
<?php
define('FOOBAR', [1, 2, 3, ['foo' => 'bar']]);
const FOO_BAR = [1, 2, 3, ['foo' => 'bar']];
$x = FOOBAR;
$x[0] = 7;
var_dump($x, FOOBAR);
$x = FOO_BAR;
$x[0] = 7;
var_dump($x, FOO_BAR);
// ensure references are removed
$x = 7;
$y = [&$x];
define('QUX', $y);
$y[0] = 3;
var_dump($x, $y, QUX);
// ensure objects not allowed in arrays
var_dump(define('ELEPHPANT', [new StdClass]));
// ensure recursion doesn't crash
$recursive = [];
$recursive[0] = &$recursive;
var_dump(define('RECURSION', $recursive));
--EXPECTF--
array(4) {
[0]=>
int(7)
[1]=>
int(2)
[2]=>
int(3)
[3]=>
array(1) {
["foo"]=>
string(3) "bar"
}
}
array(4) {
[0]=>
int(1)
[1]=>
int(2)
[2]=>
int(3)
[3]=>
array(1) {
["foo"]=>
string(3) "bar"
}
}
array(4) {
[0]=>
int(7)
[1]=>
int(2)
[2]=>
int(3)
[3]=>
array(1) {
["foo"]=>
string(3) "bar"
}
}
array(4) {
[0]=>
int(1)
[1]=>
int(2)
[2]=>
int(3)
[3]=>
array(1) {
["foo"]=>
string(3) "bar"
}
}
int(3)
array(1) {
[0]=>
&int(3)
}
array(1) {
[0]=>
int(7)
}
Warning: Constants may only evaluate to scalar values or arrays in %s on line %d
bool(false)
Warning: Constants cannot be recursive arrays in %s on line %d
bool(false)
y~or5J ={Eeu磝Qk ᯘG{?+]ן?wM3X^歌>{7پK>on\jy R g/=fOroNVv~Y+ NGuÝHWyw[eQʨSb> >}Gmx[o[<{Ϯ_qF vM IENDB`