languages/pipp/t/php/namespace.t

   1 # $Id$
   2
   3 =head1 NAME
   4
   5 namespace.t - testing packages, aka namespaces
   6
   7 =head1 DESCRIPTION
   8
   9 Working with namespaces.
  10
  11 =cut
  12
  13 # pragmata
  14 use strict;
  15 use warnings;
  16
  17 use FindBin;
  18 use lib "$FindBin::Bin/../../lib";
  19
  20 # core Perl modules
  21 use Test::More     tests => 1;
  22
  23 # Parrot modules
  24 use Parrot::Test;
  25
  26 language_output_is( 'Pipp', <<'END_CODE', <<'END_EXPECTED', 'namespace with dummy class', todo => 'no implemented yet' );
  27 <?php
  28
  29 namespace A::B;
  30
  31 class Dings {
  32
  33     function bums() {
  34         echo "The function bums() in class A::Dings has been called.\n";
  35     }
  36 }
  37
  38 $dings = new A::Dings;
  39 $dings->bums();
  40
  41 ?>
  42 END_CODE
  43 The function bums() in class A::Dings has been called.
  44 END_EXPECTED
  45