From 6040e06a47274d4f82fc456f9b7f682e1e0eee7c Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Mon, 8 Jan 2018 10:48:51 -0800 Subject: [PATCH] contract correction --- pollen/private/ts.rktd | 2 +- pollen/scribblings/pagetree.scrbl | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/pollen/private/ts.rktd b/pollen/private/ts.rktd index e6488bd..03bb9c4 100644 --- a/pollen/private/ts.rktd +++ b/pollen/private/ts.rktd @@ -1 +1 @@ -1513201569 +1515437331 diff --git a/pollen/scribblings/pagetree.scrbl b/pollen/scribblings/pagetree.scrbl index 5400764..d0195d4 100644 --- a/pollen/scribblings/pagetree.scrbl +++ b/pollen/scribblings/pagetree.scrbl @@ -335,7 +335,7 @@ Find the parent pagenode of @racket[_p] within @racket[_pagetree]. Return @racke (children [p (or/c #f pagenodeish?)] [pagetree (or/c pagetree? pathish?) (current-pagetree)]) -(or/c #f pagenode?)] +(or/c #f (listof pagenode?))] Find the child pagenodes of @racket[_p] within @racket[_pagetree]. Return @racket[#f] if there aren't any. @examples[#:eval my-eval @@ -351,7 +351,7 @@ Find the child pagenodes of @racket[_p] within @racket[_pagetree]. Return @racke (siblings [p (or/c #f pagenodeish?)] [pagetree (or/c pagetree? pathish?) (current-pagetree)]) -(or/c #f pagenode?)] +(or/c #f (listof pagenode?))] Find the sibling pagenodes of @racket[_p] within @racket[_pagetree]. The result includes @racket[_p] itself. But the function will still return @racket[#f] if @racket[_pagetree] is @racket[#f]. @examples[#:eval my-eval @@ -365,7 +365,7 @@ Find the sibling pagenodes of @racket[_p] within @racket[_pagetree]. The result (other-siblings [p (or/c #f pagenodeish?)] [pagetree (or/c pagetree? pathish?) (current-pagetree)]) -(or/c #f pagenode?)] +(or/c #f (listof pagenode?))] Like @racket[siblings], but the result does not include @racket[_p] itself. @examples[#:eval my-eval