{"size": 609, "ext": "rktl", "max_stars_repo_path": "htdp-test/tests/htdp-lang/intmlam-adv.rktl", "max_stars_repo_name": "bdeket/htdp", "max_stars_repo_stars_event_min_datetime": "2015-01-14T20:28:41.000Z", "max_stars_repo_stars_event_max_datetime": "2022-03-20T04:04:26.000Z", "max_issues_repo_path": "htdp-test/tests/htdp-lang/intmlam-adv.rktl", "max_issues_repo_name": "bdeket/htdp", "max_issues_repo_issues_event_min_datetime": "2015-01-14T19:50:21.000Z", "max_issues_repo_issues_event_max_datetime": "2022-02-19T21:38:00.000Z", "max_forks_repo_path": "htdp-test/tests/htdp-lang/intmlam-adv.rktl", "max_forks_repo_name": "bdeket/htdp", "max_forks_repo_forks_event_min_datetime": "2015-01-14T19:11:38.000Z", "max_forks_repo_forks_event_max_datetime": "2022-03-24T05:11:39.000Z"}
{"max_stars_count": 85, "max_issues_count": 132, "max_forks_count": 81, "avg_line_length": 27.6818181818, "max_line_length": 140, "alphanum_fraction": 0.6551724138}

(syntax-test #'(lambda (z z) 10))

(define f7 (lambda (y) (lambda (z) z)))
(test #t procedure? f7)
(test 778 (lambda (x) 778) 'ignored)

(test values (lambda (f) (f f)) values)

(define (f11 y) ((lambda (x) x) y))
(test 'id f11 'id)

(err/rt-test (1 2 3))

(htdp-syntax-test #'(recur empty-f () 10) "recur: expected a function name after recur, but nothing's there"
(htdp-syntax-test #'(local [(lambda (x) x)] 1) "local: expected a definition, but found a part")

(htdp-syntax-test #'((unquote-splicing (list 10))) "unquote-splicing: misuse of ,@ or unquote-splicing, not under a quasiquoting backquote")



