mirror of
https://github.com/digital-asset/daml.git
synced 2024-09-20 17:28:46 +03:00
a925f0174c
* update copyright notices for 2021 To be merged on 2021-01-01. CHANGELOG_BEGIN CHANGELOG_END * patch-bazel-windows & da-ghc-lib
37 lines
646 B
Haskell
37 lines
646 B
Haskell
-- Copyright (c) 2021 Digital Asset (Switzerland) GmbH and/or its affiliates. All rights reserved.
|
|
-- SPDX-License-Identifier: Apache-2.0
|
|
|
|
|
|
module ReplTest where
|
|
|
|
import ReplTestIndirect
|
|
|
|
template T
|
|
with
|
|
proposer : Party
|
|
accepter : Party
|
|
where
|
|
signatory proposer, accepter
|
|
|
|
template TProposal
|
|
with
|
|
proposer : Party
|
|
accepter : Party
|
|
where
|
|
signatory proposer
|
|
observer accepter
|
|
choice Accept : ContractId T
|
|
controller accepter
|
|
do myCreate (T proposer accepter)
|
|
|
|
data D = D
|
|
with
|
|
x : Int
|
|
y : Int
|
|
deriving Show
|
|
|
|
data NameCollision = NameCollision
|
|
with
|
|
field : Text
|
|
deriving Show
|