balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

More fixes for PascaLIGO.

Browse Source
This commit is contained in:
Sander Spies 2020-06-08 15:07:20 +02:00
parent a58dca7097
commit cee9cc841e
5 changed files with 9 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/passes/01-parser/pascaligo/Pretty.ml
View File

@ -411,8 +411,8 @@ and pp_bool_expr = function
Or e -> pp_bin_op "or" e
| And e -> pp_bin_op "and" e
| Not e -> pp_un_op "not" e
| True _ -> string "true"
| False _ -> string "false"
| True _ -> string "True"
| False _ -> string "False"
and pp_bin_op op {value; _} =
let {arg1; arg2; _} = value

3
src/test/contracts/dune
View File

@ -1053,7 +1053,6 @@
(rule (targets arithmetic.ligo_ast) (action (with-stdout-to arithmetic.ligo_ast (run ligo print-ast arithmetic.ligo -s pascaligo))) (deps arithmetic.ligo))
(rule (targets assign.ligo_ast) (action (with-stdout-to assign.ligo_ast (run ligo print-ast assign.ligo -s pascaligo))) (deps assign.ligo))
(rule (targets attributes.ligo_ast) (action (with-stdout-to attributes.ligo_ast (run ligo print-ast attributes.ligo -s pascaligo))) (deps attributes.ligo))
(rule (targets bad_timestamp.ligo_ast) (action (with-stdout-to bad_timestamp.ligo_ast (run ligo print-ast bad_timestamp.ligo -s pascaligo))) (deps bad_timestamp.ligo))
(rule (targets bad_type_operator.ligo_ast) (action (with-stdout-to bad_type_operator.ligo_ast (run ligo print-ast bad_type_operator.ligo -s pascaligo))) (deps bad_type_operator.ligo))
(rule (targets balance_constant.ligo_ast) (action (with-stdout-to balance_constant.ligo_ast (run ligo print-ast balance_constant.ligo -s pascaligo))) (deps balance_constant.ligo))
(rule (targets big_map.ligo_ast) (action (with-stdout-to big_map.ligo_ast (run ligo print-ast big_map.ligo -s pascaligo))) (deps big_map.ligo))
@ -1240,7 +1239,6 @@
(rule (targets arithmetic.ligo_ast_pretty) (action (with-stdout-to arithmetic.ligo_ast_pretty (run ligo print-ast arithmetic.ligo_output -s pascaligo))) (deps arithmetic.ligo_output))
(rule (targets assign.ligo_ast_pretty) (action (with-stdout-to assign.ligo_ast_pretty (run ligo print-ast assign.ligo_output -s pascaligo))) (deps assign.ligo_output))
(rule (targets attributes.ligo_ast_pretty) (action (with-stdout-to attributes.ligo_ast_pretty (run ligo print-ast attributes.ligo_output -s pascaligo))) (deps attributes.ligo_output))
(rule (targets bad_timestamp.ligo_ast_pretty) (action (with-stdout-to bad_timestamp.ligo_ast_pretty (run ligo print-ast bad_timestamp.ligo_output -s pascaligo))) (deps bad_timestamp.ligo_output))
(rule (targets bad_type_operator.ligo_ast_pretty) (action (with-stdout-to bad_type_operator.ligo_ast_pretty (run ligo print-ast bad_type_operator.ligo_output -s pascaligo))) (deps bad_type_operator.ligo_output))
(rule (targets balance_constant.ligo_ast_pretty) (action (with-stdout-to balance_constant.ligo_ast_pretty (run ligo print-ast balance_constant.ligo_output -s pascaligo))) (deps balance_constant.ligo_output))
(rule (targets big_map.ligo_ast_pretty) (action (with-stdout-to big_map.ligo_ast_pretty (run ligo print-ast big_map.ligo_output -s pascaligo))) (deps big_map.ligo_output))
@ -1427,7 +1425,6 @@
(alias (name runtest) (action (diff arithmetic.ligo_ast arithmetic.ligo_ast_pretty)) (deps arithmetic.ligo_ast arithmetic.ligo_ast_pretty))
(alias (name runtest) (action (diff assign.ligo_ast assign.ligo_ast_pretty)) (deps assign.ligo_ast assign.ligo_ast_pretty))
(alias (name runtest) (action (diff attributes.ligo_ast attributes.ligo_ast_pretty)) (deps attributes.ligo_ast attributes.ligo_ast_pretty))
(alias (name runtest) (action (diff bad_timestamp.ligo_ast bad_timestamp.ligo_ast_pretty)) (deps bad_timestamp.ligo_ast bad_timestamp.ligo_ast_pretty))
(alias (name runtest) (action (diff bad_type_operator.ligo_ast bad_type_operator.ligo_ast_pretty)) (deps bad_type_operator.ligo_ast bad_type_operator.ligo_ast_pretty))
(alias (name runtest) (action (diff balance_constant.ligo_ast balance_constant.ligo_ast_pretty)) (deps balance_constant.ligo_ast balance_constant.ligo_ast_pretty))
(alias (name runtest) (action (diff big_map.ligo_ast big_map.ligo_ast_pretty)) (deps big_map.ligo_ast big_map.ligo_ast_pretty))

8
src/test/contracts/expected/boolean_operators.ligo.expected
View File

@ -1,9 +1,9 @@
function or_true (const b : bool) : bool is b or true
function or_true (const b : bool) : bool is b or True
function or_false (const b : bool) : bool is b or false
function or_false (const b : bool) : bool is b or False
function and_true (const b : bool) : bool is b and true
function and_true (const b : bool) : bool is b and True
function and_false (const b : bool) : bool is b and false
function and_false (const b : bool) : bool is b and False
function not_bool (const b : bool) : bool is not b

4
src/test/contracts/expected/loop.ligo.expected
View File

@ -208,7 +208,7 @@ block {
function dummy (const n : nat) : nat is
block {
while false
while False
block {
skip
}
@ -218,7 +218,7 @@ function inner_capture_in_conditional_block (var nee : unit)
: bool * int is
block {
var count : int := 1;
var ret : bool := false;
var ret : bool := False;
var mylist : list (int) := list [1; 2; 3];
for it1 in list mylist
block {

2
src/test/contracts/expected/variant.ligo.expected
View File

@ -2,6 +2,6 @@ type foobar is Foo of int | Bar of bool | Kee of nat
const foo : foobar = Foo (42)
const bar : foobar = Bar (true)
const bar : foobar = Bar (True)
const kee : foobar = Kee (23n)