// Clipboard_as.hx:  ActionScript 3 "Clipboard" class, for Gnash.
//
// Generated by gen-as3.sh on: 20090514 by "rob". Remove this
// after any hand editing loosing changes.
//
//   Copyright (C) 2009, 2010 Free Software Foundation, Inc.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 3 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
//

// This test case must be processed by CPP before compiling to include the
//  DejaGnu.hx header file for the testing framework support.

#if flash9
import flash.desktop.Clipboard;
import flash.display.MovieClip;
#end
import flash.Lib;
import Type;
import Std;

// import our testing API
import DejaGnu;


// Class must be named with the _as suffix, as that's the same name as the file.
class Clipboard_as {
    static function main() {
        var x1:Clipboard = new Clipboard();

        // Make sure we actually get a valid class        
        if (x1 != null) {
            DejaGnu.pass("Clipboard class exists");
        } else {
            DejaGnu.fail("Clipboard lass doesn't exist");
        }
// Tests to see if all the properties exist. All these do is test for
// existance of a property, and don't test the functionality at all. This
// is primarily useful only to test completeness of the API implementation.
	if (Std.is(x1.formats, Array)) {
	    DejaGnu.pass("Clipboard::formats property exists");
	} else {
	    DejaGnu.fail("Clipboard::formats property doesn't exist");
	}
	if (Type.typeof(x1.generalClipboard) == ValueType.TObject) {
	    DejaGnu.pass("Clipboard::generalClipboard property exists");
	} else {
	    DejaGnu.fail("Clipboard::generalClipboard property doesn't exist");
	}

// Tests to see if all the methods exist. All these do is test for
// existance of a method, and don't test the functionality at all. This
// is primarily useful only to test completeness of the API implementation.
	if (Type.typeof(x1.clear) == ValueType.TFunction) {
	    DejaGnu.pass("Clipboard::clear() method exists");
	} else {
	    DejaGnu.fail("Clipboard::clear() method doesn't exist");
	}
	if (Type.typeof(x1.clearData) == ValueType.TFunction) {
	    DejaGnu.pass("Clipboard::clearData() method exists");
	} else {
	    DejaGnu.fail("Clipboard::clearData() method doesn't exist");
	}
	if (Type.typeof(x1.getData) == ValueType.TFunction) {
	    DejaGnu.pass("Clipboard::getData() method exists");
	} else {
	    DejaGnu.fail("Clipboard::getData() method doesn't exist");
	}
	if (Type.typeof(x1.hasFormat)== ValueType.TFunction) {
	    DejaGnu.pass("Clipboard::hasFormat() method exists");
	} else {
	    DejaGnu.fail("Clipboard::hasFormat() method doesn't exist");
	}
	if (Type.typeof(x1.setData) == ValueType.TFunction) {
	    DejaGnu.pass("Clipboard::setData() method exists");
	} else {
	    DejaGnu.fail("Clipboard::setData() method doesn't exist");
	}
	if (Type.typeof(x1.setDataHandler) == ValueType.TFunction) {
	    DejaGnu.pass("Clipboard::setDataHandler() method exists");
	} else {
	    DejaGnu.fail("Clipboard::setDataHandler() method doesn't exist");
	}

        // Call this after finishing all tests. It prints out the totals.
        DejaGnu.done();
    }
}

// local Variables:
// mode: C++
// indent-tabs-mode: t
// End:

