| PasteRack.org | ||
| Paste # 7339 | ||
| 2013-10-14 15:41:36 | ||
Fork as a new paste. | ||
Paste viewed 1179 times. | ||
Tweet | ||
Embed: | ||
#lang scheme/base
(require "private/provide-structs.rkt"
racket/contract/base
xml/xexpr
net/url-structs)
(provide-structs
[body-id ([value string?])]
[hover-property ([text string?])]
[script-property ([type string?]
[script (or/c path-string? (listof string?))])]
[css-addition ([path (or/c path-string? (cons/c 'collects (listof bytes?)) url? bytes?)])]
[js-addition ([path (or/c path-string? (cons/c 'collects (listof bytes?)) url? bytes?)])]
[html-defaults ([prefix-path (or/c bytes? path-string? (cons/c 'collects (listof bytes?)))]
[style-path (or/c bytes? path-string? (cons/c 'collects (listof bytes?)))]
[extra-files (listof (or/c path-string? (cons/c 'collects (listof bytes?))))])]
[url-anchor ([name string?])]
[alt-tag ([name (and/c string? #rx"^[a-zA-Z0-9]+$")])]
[attributes ([assoc (listof (cons/c symbol? string?))])]
[column-attributes ([assoc (listof (cons/c symbol? string?))])]
[part-link-redirect ([url url?])]
[install-resource ([path path-string?])]
[link-resource ([path path-string?])]
[head-extra ([xexpr xexpr/c])]
[render-pict-as ([type symbol?])])
=>
/home/stchang/racket/pasterack/tmp/7339/7339code.scrbl:3:146: private/provide-structs.rkt: invalid module-path form in: private/provide-structs.rkt