- entity *impl = get_SymConst_entity(get_atomic_ent_value(ent));
- assert(get_entity_peculiarity(impl) == peculiarity_existent &&
- "inherited entities must have constant pointing to existent entity.");
+ if (is_Method_type(get_entity_type(ent))) {
+ entity *impl = get_SymConst_entity(get_atomic_ent_value(ent));
+ assert(get_entity_peculiarity(impl) == peculiarity_existent &&
+ "inherited method entities must have constant pointing to existent entity.");
+ }
+ }
+
+ /* Entities in global type are not dynamic or automatic allocated. */
+ if (owner == get_glob_type()) {
+ assert(get_entity_allocation(ent) != allocation_dynamic &&
+ get_entity_allocation(ent) != allocation_automatic);
+ }
+
+ if (get_entity_variability(ent) != variability_uninitialized) {
+ if (is_atomic_type(tp)) {
+ ir_node *val = get_atomic_ent_value(ent);
+ if (val)
+ assert(get_irn_mode(val) == get_type_mode(tp) &&
+ "Mode of constant in entity must match type.");
+ }