|
@@ -360,6 +360,18 @@ String function instantiate_link(model : Element, type : String, name : String,
|
|
|
return actual_name!
|
|
|
|
|
|
Void function model_delete_element(model : Element, name : String):
|
|
|
+ // Delete all attributes
|
|
|
+ //Element attrs
|
|
|
+ //String attr
|
|
|
+ //attrs = dict_keys(getAttributeList(model, name))
|
|
|
+ //while (set_len(attrs) > 0):
|
|
|
+ // attr = set_pop(attrs)
|
|
|
+ // log("Remove attr " + attr)
|
|
|
+ // attr = reverseKeyLookup(model["model"], read_attribute(model, name, attr))
|
|
|
+ // remove_type(model, attr)
|
|
|
+ // delete_element(model["model"][attr])
|
|
|
+
|
|
|
+ // Delete element itself
|
|
|
remove_type(model, name)
|
|
|
delete_element(model["model"][name])
|
|
|
return!
|