diff options
Diffstat (limited to 'lib/qparser/parser.mly')
| -rw-r--r-- | lib/qparser/parser.mly | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/qparser/parser.mly b/lib/qparser/parser.mly index 861d8b9..9501884 100644 --- a/lib/qparser/parser.mly +++ b/lib/qparser/parser.mly @@ -18,7 +18,7 @@ %} %parameter<Analyzer: Qsp_syntax.S.Analyzer> -%start <(Analyzer.Location.t)>main +%start <(Analyzer.context -> Analyzer.Location.t)>main %on_error_reduce expression instruction unary_operator assignation_operator %% @@ -31,7 +31,7 @@ main: LOCATION_END { let instructions = List.map instructions ~f:(Analyzer.Instruction.v) in - Analyzer.Location.location $loc instructions + fun context -> Analyzer.Location.location context $loc instructions } before_location: |