no gui update after change of share (#24) · Issues · clean-and-itasks / iTasks-SDK

no gui update after change of share

The following example did not work anymore after my last update. In the chat function nu updates of the chatting partner is happening anymore, in any direction..


chat1 :: Task (Note,Note)
chat1 = chat
	    

:: Situation	= AllIsFine | Fire | WaterProblem | TrafficAccident | OtherIssue Note
:: Reaction		= NoActionProposed | SendFireBrigate | SendPolice | SendSpecialForces | OtherProposal Note

derive class iTask Situation, Reaction

// chat: one worker can provide information of arbitrary type a which can be inspected by someone else
// while the other can show its work of arbitrary type b

chat :: Task (a,b) | iTask a & iTask b
chat =							selectCoWorker "with whom do you want to work ? "
		>>= \(me,colleague) ->	withShared defaultValue 
			(\workOfMe ->		withShared defaultValue
			(\workOfColleague ->((me,"chat") @: updateAndView (me,workOfMe) (colleague,workOfColleague))
								-&&-
								((colleague,"chat") @: updateAndView (colleague,workOfColleague) (me,workOfMe))
			))

The following example did not work anymore after my last update.
In the chat function nu updates of the chatting partner is happening anymore, in any direction..

```

chat1 :: Task (Note,Note)
chat1 = chat

derive class iTask Situation, Reaction

// chat: one worker can provide information of arbitrary type a which can be inspected by someone else
// while the other can show its work of arbitrary type b

chat :: Task (a,b) | iTask a & iTask b
chat =							selectCoWorker "with whom do you want to work ? "
		>>= \(me,colleague) ->	withShared defaultValue 
			(\workOfMe ->		withShared defaultValue
			(\workOfColleague ->((me,"chat") @: updateAndView (me,workOfMe) (colleague,workOfColleague))
								-&&-
								((colleague,"chat") @: updateAndView (colleague,workOfColleague) (me,workOfMe))
			))
```

To upload designs, you'll need to enable LFS. More information