X-Git-Url: http://www.aleph1.co.uk/gitweb/?p=yaffs-website;a=blobdiff_plain;f=vendor%2Fgabordemooij%2Fredbean%2Ftesting%2FRedUNIT%2FPretest.php;fp=vendor%2Fgabordemooij%2Fredbean%2Ftesting%2FRedUNIT%2FPretest.php;h=ff88f00ed8de8cc40b70d487c8abc1a5b6df86a4;hp=0000000000000000000000000000000000000000;hb=eba34333e3c89f208d2f72fa91351ad019a71583;hpb=a2bd1bf0c2c1f1a17d188f4dc0726a45494cefae

diff --git a/vendor/gabordemooij/redbean/testing/RedUNIT/Pretest.php b/vendor/gabordemooij/redbean/testing/RedUNIT/Pretest.php
new file mode 100644
index 000000000..ff88f00ed
--- /dev/null
+++ b/vendor/gabordemooij/redbean/testing/RedUNIT/Pretest.php
@@ -0,0 +1,32 @@
+<?php
+
+/**
+ * Pretest
+ *
+ * These tests will run before the configuration takes place
+ * in the unit test suite (mostly error handling tests).
+ *
+ * @file    RedUNIT/Pretest.php
+ * @desc    Test scripts that run before configuration
+ * @author  Gabor de Mooij and the RedBeanPHP Community
+ * @license New BSD/GPLv2
+ *
+ * (c) G.J.G.T. (Gabor) de Mooij and the RedBeanPHP Community.
+ * This source file is subject to the New BSD/GPLv2 License that is bundled
+ * with this source code in the file license.txt.
+ */
+
+testpack('Running pre-tests. (before config).');
+
+try {
+	R::debug( TRUE );
+	fail();
+} catch( Exception $e ) {
+	pass();
+}
+
+asrt( R::testConnection(), FALSE);
+
+R::addDatabase( 'broken', 'mysql:host=nowhere', 'defunct', 'void' );
+R::selectDatabase( 'broken' );
+asrt( R::testConnection(), FALSE );