diff options
Diffstat (limited to 'debian/perl-framework/t/htdocs/php/switch4.php')
| -rw-r--r-- | debian/perl-framework/t/htdocs/php/switch4.php | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/debian/perl-framework/t/htdocs/php/switch4.php b/debian/perl-framework/t/htdocs/php/switch4.php new file mode 100644 index 0000000..24fb51f --- /dev/null +++ b/debian/perl-framework/t/htdocs/php/switch4.php @@ -0,0 +1,29 @@ +<?php + +function switchtest ($i, $j) +{ + switch ($i): + case 0: + switch($j) { + case 0: + echo "zero"; + break; + case 1: + echo "one"; + break; + default: + echo $j; + break; + } + echo "\n"; + break; + default: + echo "Default taken\n"; + endswitch; +} +for ($i=0; $i<3; $i++) { + for ($k=0; $k<10; $k++) { + switchtest (0,$k); + } +} +?> |