[E-p-i-c-commits] org.epic.perleditor-test/workspace/.metadata/.plugins/org.eclipse.core.resources/.history/ed b0bbf109cc11001c16bf83c45ca7ee5c, NONE, 1.1

[Jan P. <jp...@us...>]

Update of /cvsroot/e-p-i-c/org.epic.perleditor-test/workspace/.metadata/.plugins/org.eclipse.core.resources/.history/ed
In directory sc8-pr-cvs17:/tmp/cvs-serv8895/workspace/.metadata/.plugins/org.eclipse.core.resources/.history/ed

Added Files:
	b0bbf109cc11001c16bf83c45ca7ee5c 
Log Message:
Added the first PDE unit test cases for org.epic.debug.

--- NEW FILE: b0bbf109cc11001c16bf83c45ca7ee5c ---
#!/usr/bin/perl

use strict;
use warnings;

use Cwd;

require './test_Debugger2.pl';

my $x = 123;
my $str = 'string';
my $hash = { first => $x, second => $str };

foo($hash);

sub foo
{
	my $bar = shift;
	$bar->{third} = $bar;
	print "one\n";
	print "two\n";
	print "three\n";
	
	my $path = getcwd().'test_Debugger2.pl';
	require $path;
}