2019-11-12 08:01:18 -08:00
|
|
|
(**
|
|
|
|
|
|
|
|
|
|
This test makes sure that the balance is accessible in PascaLIGO.
|
|
|
|
|
It's there to detect a regression of: https://gitlab.com/ligolang/ligo/issues/68
|
|
|
|
|
|
|
|
|
|
*)
|
|
|
|
|
|
|
|
|
|
type storage is tez
|
|
|
|
|
|
2019-12-11 19:15:25 +01:00
|
|
|
function main (const p : unit; const s: tez) : list(operation) * storage is
|
2019-11-12 08:01:18 -08:00
|
|
|
((nil : list(operation)), balance)
|
