[svn:parrot] r42250 - trunk/t/src

chromatic at svn.parrot.org chromatic at svn.parrot.org
Tue Nov 3 22:35:45 UTC 2009


Author: chromatic
Date: Tue Nov  3 22:35:44 2009
New Revision: 42250
URL: https://trac.parrot.org/parrot/changeset/42250

Log:
[t] Cleaned up some code in t/src/warnings.t.  The failing tests (TT #1187)
still don't pass, but at least the error message is clearer.

Modified:
   trunk/t/src/warnings.t

Modified: trunk/t/src/warnings.t
==============================================================================
--- trunk/t/src/warnings.t	Tue Nov  3 22:35:34 2009	(r42249)
+++ trunk/t/src/warnings.t	Tue Nov  3 22:35:44 2009	(r42250)
@@ -36,13 +36,11 @@
 int
 main(int argc, char* argv[])
 {
-    Interp *interp;
+    Parrot_Interp interp = Parrot_new(NULL);
     int error_val;
 
-    interp = Parrot_new(NULL);
-    if (!interp) {
+    if (!interp)
         return 1;
-    }
 
     print_pbc_location(interp);
 
@@ -61,13 +59,12 @@
 int
 main(int argc, char* argv[])
 {
-    Interp *interp;
+    Parrot_Interp interp = Parrot_new(NULL);
     int error_val;
 
-    interp = Parrot_new(NULL);
-    if (!interp) {
+    if (!interp)
         return 1;
-    }
+
     PARROT_WARNINGS_on(interp, PARROT_WARNINGS_ALL_FLAG);
 
     error_val = Parrot_warn(interp, PARROT_WARNINGS_ALL_FLAG, "all");


More information about the parrot-commits mailing list