about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--doc/skribilo.scm7
1 files changed, 7 insertions, 0 deletions
diff --git a/doc/skribilo.scm b/doc/skribilo.scm
index bd2c313..be40014 100644
--- a/doc/skribilo.scm
+++ b/doc/skribilo.scm
@@ -45,6 +45,7 @@
             record-documentation
             record-field
             record-ref
+            record-field-ref
             docstring-function-documentation))
 
 ;; Constants
@@ -301,6 +302,12 @@ are a list of <record-field> objects."
   (ref #:ident identifier
        #:text (code identifier)))
 
+(define (record-field-ref record-identifier field-identifier)
+  "Link to documentation of field identified by @var{field-identifier} in
+record identified by @var{record-identifier}."
+  (ref #:ident (string-append record-identifier "-" field-identifier)
+       #:text (code field-identifier)))
+
 (define-record-type <function>
   (function name arguments docstring)
   function?