@ironm00n/pyret-lang 0.0.3 → 0.0.4

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (2) hide show
  1. package/package.json +1 -1
  2. package/src/arr/compiler/well-formed.arr +3 -3
package/package.json CHANGED
@@ -1,6 +1,6 @@
1
1
  {
2
2
  "name": "@ironm00n/pyret-lang",
3
- "version": "0.0.3",
3
+ "version": "0.0.4",
4
4
  "description": "The Pyret programming language",
5
5
  "main": "build/phase0/main-wrapper.js",
6
6
  "directories": {
package/src/arr/compiler/well-formed.arr CHANGED
@@ -233,11 +233,11 @@ fun ensure-distinct-lines(loc :: Loc, prev-is-template :: Boolean, stmts :: List
233
233
  | link(first, rest) =>
234
234
  cases(Loc) loc:
235
235
  | builtin(_) => ensure-distinct-lines(first.l, A.is-s-template(first), rest)
236
- | srcloc(_, _, _, _, end-line1, _, _) =>
236
+ | srcloc(end-source1, _, _, _, end-line1, _, _) =>
237
237
  cases(Loc) first.l block:
238
238
  | builtin(_) => ensure-distinct-lines(loc, prev-is-template, rest) # No need to preserve builtin() locs
239
- | srcloc(_, start-line2, _, _, _, _, _) =>
240
- when (end-line1 == start-line2):
239
+ | srcloc(start-source2, start-line2, _, _, _, _, _) =>
240
+ when (end-line1 == start-line2) and (end-source1 == start-source2):
241
241
  if A.is-s-template(first) and prev-is-template:
242
242
  add-error(C.template-same-line(loc, first.l))
243
243
  else if not(A.is-s-template(first)) and not(prev-is-template):