{"size": 1114, "ext": "scrbl", "max_stars_repo_path": "index.scrbl", "max_stars_repo_name": "soegaard/syntax-parse-example", "max_stars_repo_stars_event_min_datetime": null, "max_stars_repo_stars_event_max_datetime": null, "max_issues_repo_path": "index.scrbl", "max_issues_repo_name": "soegaard/syntax-parse-example", "max_issues_repo_issues_event_min_datetime": null, "max_issues_repo_issues_event_max_datetime": null, "max_forks_repo_path": "index.scrbl", "max_forks_repo_name": "soegaard/syntax-parse-example", "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": 35.935483871, "max_line_length": 86, "alphanum_fraction": 0.6059245961}
#lang scribble/manual
@require[(for-syntax racket/base syntax/parse)]
@title{The Examples}

@(define-syntax (include-example stx)
   (syntax-parse stx
    [(_ ?name:str)
     #:with scrbl-path-str (let ([name (syntax-e #'?name)])
                             (path->string
                               (path-add-extension (build-path name name) #".scrbl")))
     #:fail-unless (file-exists? (syntax-e #'scrbl-path-str))
                   (format "file '~a' does not exist, cannot render example"
                           (syntax-e #'scrbl-path-str))
     (syntax/loc stx
       (include-section scrbl-path-str))]))

@; =============================================================================

@include-example{first-class-or}
@include-example{optional-assert}
@include-example{cross-macro-communication}
@include-example{let-star}
@include-example{def}
@include-example{conditional-require}
@include-example{multi-check-true}
@include-example{define-datum-literal-set}
@include-example{rec-contract}
@include-example{struct-list}
@include-example{syntax-class-contract}
@include-example{except-in-quiet}
