| 15 | 
  | 
// Globals ************************************************ | 
| 16 | 
  | 
 | 
| 17 | 
  | 
typedef enum { GLOBAL_BLK, MOLECULE_BLK, ATOM_BLK, BOND_BLK, BEND_BLK, | 
| 18 | 
< | 
               TORSION_BLK, COMPONENT_BLK, ZCONSTRAINT_BLK } block_type; | 
| 18 | 
> | 
               TORSION_BLK, COMPONENT_BLK, ZCONSTRAINT_BLK,  | 
| 19 | 
> | 
               RIGIDBODY_BLK } block_type; | 
| 20 | 
  | 
 | 
| 21 | 
  | 
block_type current_block = GLOBAL_BLK; | 
| 22 | 
  | 
#define MAX_NEST 20 // the max number of nested blocks | 
| 56 | 
  | 
      incr_block( ZCONSTRAINT_BLK ); | 
| 57 | 
  | 
      handled = the_globals->newZconstraint( the_event ); | 
| 58 | 
  | 
      break; | 
| 59 | 
+ | 
 | 
| 60 | 
+ | 
    case RIGIDBODY: | 
| 61 | 
+ | 
      incr_block( RIGIDBODY_BLK ); | 
| 62 | 
+ | 
      handled = the_stamps->newRigidBody( the_event ); | 
| 63 | 
+ | 
      break; | 
| 64 | 
  | 
       | 
| 65 | 
  | 
    case COMPONENT: | 
| 66 | 
  | 
      incr_block( COMPONENT_BLK ); | 
| 106 | 
  | 
      handled = the_stamps->newTorsion( the_event ); | 
| 107 | 
  | 
      break; | 
| 108 | 
  | 
 | 
| 109 | 
+ | 
    case RIGIDBODY: | 
| 110 | 
+ | 
      incr_block( RIGIDBODY_BLK ); | 
| 111 | 
+ | 
      handled = the_stamps->newRigidBody( the_event ); | 
| 112 | 
+ | 
      break; | 
| 113 | 
+ | 
 | 
| 114 | 
  | 
    case ASSIGNMENT: | 
| 115 | 
  | 
      handled = the_stamps->moleculeAssign( the_event ); | 
| 116 | 
  | 
      break; | 
| 123 | 
  | 
    default: | 
| 124 | 
  | 
      the_event->err_msg =  | 
| 125 | 
  | 
        strdup( "Not a valid molecule event\n" ); | 
| 126 | 
+ | 
      return 0; | 
| 127 | 
+ | 
    } | 
| 128 | 
+ | 
    break; | 
| 129 | 
+ | 
 | 
| 130 | 
+ | 
 | 
| 131 | 
+ | 
  case RIGIDBODY_BLK: | 
| 132 | 
+ | 
     | 
| 133 | 
+ | 
    switch( the_event->event_type ){ | 
| 134 | 
+ | 
       | 
| 135 | 
+ | 
    case ATOM: | 
| 136 | 
+ | 
      incr_block( ATOM_BLK ); | 
| 137 | 
+ | 
      handled = the_stamps->newAtom( the_event ); | 
| 138 | 
+ | 
      break; | 
| 139 | 
+ | 
       | 
| 140 | 
+ | 
    case POSITION: | 
| 141 | 
+ | 
      handled = the_stamps->rigidBodyPosition( the_event ); | 
| 142 | 
+ | 
      break; | 
| 143 | 
+ | 
       | 
| 144 | 
+ | 
    case ORIENTATION: | 
| 145 | 
+ | 
      handled = the_stamps->rigidBodyOrientation( the_event ); | 
| 146 | 
+ | 
      break; | 
| 147 | 
+ | 
 | 
| 148 | 
+ | 
    case ASSIGNMENT: | 
| 149 | 
+ | 
      handled = the_stamps->rigidBodyAssign( the_event ); | 
| 150 | 
+ | 
      break; | 
| 151 | 
+ | 
 | 
| 152 | 
+ | 
    case BLOCK_END: | 
| 153 | 
+ | 
      decr_block(); | 
| 154 | 
+ | 
      handled = the_stamps->rigidBodyEnd( the_event ); | 
| 155 | 
+ | 
      break; | 
| 156 | 
+ | 
 | 
| 157 | 
+ | 
    default: | 
| 158 | 
+ | 
      the_event->err_msg =  | 
| 159 | 
+ | 
        strdup( "Not a valid RigidBody event\n" ); | 
| 160 | 
  | 
      return 0; | 
| 161 | 
  | 
    } | 
| 162 | 
  | 
    break; | 
| 163 | 
  | 
 | 
| 164 | 
+ | 
 | 
| 165 | 
  | 
  case ATOM_BLK: | 
| 166 | 
  | 
     | 
| 167 | 
  | 
    switch( the_event->event_type ){ |