architecture.mvc 551 B

123456789101112131415161718192021222324252627282930
  1. include "primitives.alh"
  2. SimpleAttribute String{
  3. name = "String"
  4. constraint = $
  5. String function main(model : Element, name : String):
  6. if (is_physical_string(model["model"][name])):
  7. return "OK"!
  8. else:
  9. return "String has non-string value"!
  10. $
  11. }
  12. Class Group {
  13. name : String
  14. name = "Group"
  15. }
  16. Class Port {
  17. name : String
  18. name = "Port"
  19. }
  20. Association Connects (Port, Port) {
  21. name = "Connects"
  22. }
  23. Association Contains (Group, Port) {
  24. name = "Contains"
  25. }