From 7c8c1c41817de432d36b40242250dd758097d4ab Mon Sep 17 00:00:00 2001 From: Jack Firth Date: Tue, 7 Jul 2015 16:42:34 -0700 Subject: [PATCH] Rename struct-lens module --- lens/main.scrbl | 2 +- lens/{struct-lens.rkt => struct.rkt} | 0 lens/{struct-lens.scrbl => struct.scrbl} | 7 +++---- 3 files changed, 4 insertions(+), 5 deletions(-) rename lens/{struct-lens.rkt => struct.rkt} (100%) rename lens/{struct-lens.scrbl => struct.scrbl} (83%) diff --git a/lens/main.scrbl b/lens/main.scrbl index fc12e0b..42b8a83 100644 --- a/lens/main.scrbl +++ b/lens/main.scrbl @@ -15,6 +15,6 @@ source code: @url["https://github.com/jackfirth/lens"] @include-section["base/main.scrbl"] @include-section["list/main.scrbl"] -@include-section["struct-lens.scrbl"] +@include-section["struct.scrbl"] @include-section["syntax.scrbl"] @include-section["applicable.scrbl"] diff --git a/lens/struct-lens.rkt b/lens/struct.rkt similarity index 100% rename from lens/struct-lens.rkt rename to lens/struct.rkt diff --git a/lens/struct-lens.scrbl b/lens/struct.scrbl similarity index 83% rename from lens/struct-lens.scrbl rename to lens/struct.scrbl index 7fa12b3..1152ee7 100644 --- a/lens/struct-lens.scrbl +++ b/lens/struct.scrbl @@ -3,22 +3,21 @@ @(require scribble/eval "lenses-examples.rkt" (for-label lens - lens/struct-lens + lens/struct racket/base racket/contract)) @title{Struct lenses} -@defmodule[lens/struct-lens] +@defmodule[lens/struct] @defform[(struct-lens struct-id field-id)]{ Returns a lens for viewing the @racket[field-id] field of a @racket[struct-id] instance. @lenses-examples[ - (require lens/struct-lens) + (require lens/struct) (struct foo (a b c) #:transparent) (lens-view (struct-lens foo a) (foo 1 2 3)) (lens-set (struct-lens foo a) (foo 1 2 3) 100) ]} -