suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

scriblib/autobib: add dissertation-location

Browse Source 
svn: r15398
This commit is contained in:
Matthew Flatt 2009-07-06 18:05:43 +00:00
parent 2c973452d4
commit 3e4d8669c4
2 changed files with 14 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
collects/scriblib/autobib.ss
View File

@ -7,7 +7,8 @@
(provide autobib-style-extras (provide autobib-style-extras
define-cite define-cite
make-bib in-bib (rename-out [auto-bib? bib?]) make-bib in-bib (rename-out [auto-bib? bib?])
proceedings-location journal-location book-location techrpt-location proceedings-location journal-location book-location
techrpt-location dissertation-location
author-name org-author-name authors editor) author-name org-author-name authors editor)
(define (autobib-style-extras) (define (autobib-style-extras)
@ -217,6 +218,11 @@
#:number num) #:number num)
@elem{@|org|, @|num|}) @elem{@|org|, @|num|})
(define (dissertation-location
#:institution org
#:degree [degree "PhD"])
@elem{@|degree| dissertation, @|org|})
;; ---------------------------------------- ;; ----------------------------------------
(define (author-name first last #:suffix [suffix #f]) (define (author-name first last #:suffix [suffix #f])

7
collects/scriblib/scribblings/autobib.scrbl
View File

@ -108,6 +108,13 @@ describing a book's location.}
Combines elements to generate an element that is suitable for Combines elements to generate an element that is suitable for
describing a technical report's location.} describing a technical report's location.}
@defproc[(dissertation-location [#:institution institution edition any/c]
[#:number degree any/c "PhD"])
element?]{
Combines elements to generate an element that is suitable for
describing a dissertation.}
@defproc[(author-name [first any/c] @defproc[(author-name [first any/c]
[last any/c] [last any/c]