diff options
| -rw-r--r-- | examples/dialogue/DialogueI.gf | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/examples/dialogue/DialogueI.gf b/examples/dialogue/DialogueI.gf index dea67bc2f..7dc30a74a 100644 --- a/examples/dialogue/DialogueI.gf +++ b/examples/dialogue/DialogueI.gf @@ -14,8 +14,8 @@ incomplete concrete DialogueI of Dialogue = open Multi, Prelude in { Oper2 = V3 ; lin - IRequest a = {s = a.s ! ARequest ; point = a.point} ; - IConfirm a = {s = a.s ! AConfirm ; point = a.point} ; + IRequest a = {s = a.s ! ARequest ; point = a.point ; lock_Utt = <>} ; + IConfirm a = {s = a.s ! AConfirm ; point = a.point ; lock_Utt = <>} ; IAnswer a = a ; IIssue a = a ; @@ -23,7 +23,7 @@ incomplete concrete DialogueI of Dialogue = open Multi, Prelude in { INo = no_Phr ** noPoint ; IObject _ ob = UttNP ob ; - PAction a = {s = a.s ! AConfirm ; point = a.point} ; + PAction a = {s = a.s ! AConfirm ; point = a.point ; lock_Utt = <>} ; QKind k = UttQS (UseQCl TPres ASimul PPos |