[cig-commits] r3941 - in long/3D/Gale/trunk/src/StGermain: . Discretisation/Utils/src

[walter at geodynamics.org]

Author: walter
Date: 2006-07-06 02:06:12 -0700 (Thu, 06 Jul 2006)
New Revision: 3941

Modified:
   long/3D/Gale/trunk/src/StGermain/
   long/3D/Gale/trunk/src/StGermain/Discretisation/Utils/src/ShapeVC.c
Log:
 r2469 at earth:  boo | 2006-07-06 02:02:40 -0700
  r2458 at earth (orig r3662):  RobertTurnbull | 2006-07-02 06:17:48 -0700
  Adding an error message in the ShapeVC class.
  
 



Property changes on: long/3D/Gale/trunk/src/StGermain
___________________________________________________________________
Name: svk:merge
   - 1ef209d2-b310-0410-a72d-e20c9eb0015c:/cig:2468
afb6c753-b9d0-0310-b4e7-dbd8d91cdd35:/trunk/StGermain:3660
   + 1ef209d2-b310-0410-a72d-e20c9eb0015c:/cig:2469
afb6c753-b9d0-0310-b4e7-dbd8d91cdd35:/trunk/StGermain:3662

Modified: long/3D/Gale/trunk/src/StGermain/Discretisation/Utils/src/ShapeVC.c
===================================================================
--- long/3D/Gale/trunk/src/StGermain/Discretisation/Utils/src/ShapeVC.c	2006-07-06 09:06:09 UTC (rev 3940)
+++ long/3D/Gale/trunk/src/StGermain/Discretisation/Utils/src/ShapeVC.c	2006-07-06 09:06:12 UTC (rev 3941)
@@ -327,6 +327,8 @@
 
 	assert( context && Stg_Class_IsInstance( context, AbstractContext_Type ) );
 	assert( self->shapeName );
+	Journal_Firewall( strlen( self->shapeName ) > 0, Journal_MyStream( Error_Type, self ),
+			"You need to fill out the 'Shape' dictionary entry for this ShapeVC.\n" );
 	assert( self->_mesh );
 
 	self->_shape =  Stg_ComponentFactory_ConstructByName(  context->CF,  self->shapeName, Stg_Shape,  True  ) ;