Functor

NodeClasses ("/home/annan/cvscode/isl/src/MozartMessageSimulator/MessageLog/NodeClasses.oz")

Import

• System(show:Show)
• EventdbClass(eventDB:EventDB)

Export

• <C:ComNodeClass>
• <C:ReceiveNodeClass>
• <C:SendNodeClass>
• <C:StringNodeClass>
• <C:LevelNode>

Define

class ComNodeClass from BaseNode
   feat mySite site msgNr msgSite time

• init(msgNr:Nr mySite:Ms site:S time:T ...)
  

end

class BaseNode
   feat type id

• init(id:N ...)
  
• pressed()
  
• setBeforeMe(V)
  
• getBeforeMe(V)
  
• setAfterMe(V)
  
• getAfterMe(V)
  
• setNext(V)
  
• getNext(V)
  
• setFront(V)
  
• getFront(V)
  
• getType(V)
  
• getYval($)
  
• setYval(Ytmp1)
  
• getRelations($)
  
• print()
  
• solve(SS Nr $)
  

end

class ReceiveNodeClass from ComNodeClass

• init(...)
  
• print()
  
• setBeforeMe(FF)
  
• solve(SS Nr $)
  

end

class SendNodeClass from ComNodeClass
   feat displaymsgtype

• solve(SS Nr $)
  
• init(...)
  
• print()
  

end

class StringNodeClass from BaseNode

• print()
  
• init(...)
  

end

class LevelNode from BaseNode
   feat yVal

• init(L)
  
• solve(SS Nr $)
  

end

End