{"size": 1533, "ext": "rktd", "max_stars_repo_path": "redex-test/redex/tests/run-err-tests/term.rktd", "max_stars_repo_name": "LiberalArtist/redex", "max_stars_repo_stars_event_min_datetime": null, "max_stars_repo_stars_event_max_datetime": null, "max_issues_repo_path": "redex-test/redex/tests/run-err-tests/term.rktd", "max_issues_repo_name": "LiberalArtist/redex", "max_issues_repo_issues_event_min_datetime": null, "max_issues_repo_issues_event_max_datetime": null, "max_forks_repo_path": "redex-test/redex/tests/run-err-tests/term.rktd", "max_forks_repo_name": "LiberalArtist/redex", "max_forks_repo_forks_event_min_datetime": null, "max_forks_repo_forks_event_max_datetime": null}
{"max_stars_count": null, "max_issues_count": null, "max_forks_count": null, "avg_line_length": 30.66, "max_line_length": 57, "alphanum_fraction": 0.4129158513}
(#rx"incompatible ellipsis match counts"
 ([the-body (term (((x y) ...) ...))])
 ([xlhs (x ...)] [ylhs ((y ...) ...)])
 (term-let ([xlhs '(a b c)]
            [ylhs '((1 2) (4 5 6) (7 8 9))])
           the-body))

(#rx"incompatible ellipsis match counts"
 ([body (term ((((f x) y) ...) ...))])
 ([fn f] [xlhs (x ...)] [ylhs ((y ...) ...)])
 (term-let-fn ([fn car])
              (term-let ([xlhs '(a b c)]
                         [ylhs '((1 2) (4 5 6) (7 8 9))])
                        body)))

(#rx"incompatible ellipsis match counts"
 ([body (term (f ((x y) ...)))])
 ([fn f] [xlhs (x ...)] [ylhs (y ...)])
 (term-let-fn ([fn car])
              (term-let ([xlhs '(a b)]
                         [ylhs '(c d e)])
                        body)))

(#rx"incompatible ellipsis match counts"
 ([app (term ((f (x y)) ...))])
 ([fn f] [xlhs (x ...)] [ylhs (y ...)] [ellipsis ...])
 (term-let-fn ([fn car])
              (term-let ([xlhs '(a b)]
                         [ylhs '(c d e)])
                        app)))

(#rx"incompatible ellipsis match counts"
 ([plug (term ((in-hole hole (x y)) ...))])
 ([xlhs (x ...)] [ylhs (y ...)] [ellipsis ...])
 (term-let-fn ([fn car])
              (term-let ([xlhs '(a b)]
                         [ylhs '(c d e)])
                        plug)))

(#rx"term .* does not match pattern"
 ([rhs 'a]) ([ellipsis ...])
 (term-let ([(x ellipsis) rhs]) 3))

("x: undefined;\n cannot use before initialization"
 ([use x]) ([def x])
 (let ()
   (define t (term (use y)))
   (define-term def z)
   t))
