# LVB (c) Copyright 2003-2006 by Daniel Barker.
# Permission is granted to copy and use this program provided that no fee is
# charged for it and provided that this copyright notice is not removed.

# Positive test for alloc().

# run testprog.exe
$output = `./testprog.exe`;
$status = $?;

# check output
if ((!($output =~ "FATAL ERROR")) && ($status == 0))
{
    print "test passed\n";
}
else
{
    print "test failed\n";
}
