diff options
Diffstat (limited to 'new-luxc/test/test/luxc/parser.lux')
| -rw-r--r-- | new-luxc/test/test/luxc/parser.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/new-luxc/test/test/luxc/parser.lux b/new-luxc/test/test/luxc/parser.lux index 7ccc0c451..d6b420660 100644 --- a/new-luxc/test/test/luxc/parser.lux +++ b/new-luxc/test/test/luxc/parser.lux @@ -71,11 +71,11 @@ (test: "Lux code parser." [sample ast^] (assert "Can parse Lux code." - (|> &;ast^ + (|> (&;ast^ default-cursor) (l;run (ast;to-text sample)) (case> (#;Left error) false - (#;Right parsed) + (#;Right [parsed _]) (:: ast;Eq<AST> = parsed sample)) ))) |