hholzgra Wed May 16 16:37:26 2001 EDT
Modified files:
/phpdoc html-common.dsl
Log:
make <type> link to language.types.-typename- pages
Index: phpdoc/html-common.dsl
diff -u phpdoc/html-common.dsl:1.9 phpdoc/html-common.dsl:1.10
--- phpdoc/html-common.dsl:1.9 Wed May 16 10:52:54 2001
+++ phpdoc/html-common.dsl Wed May 16 16:37:25 2001
@@ -1,6 +1,6 @@
;; -*- Scheme -*-
;;
-;; $Id: html-common.dsl,v 1.9 2001/05/16 17:52:54 hholzgra Exp $
+;; $Id: html-common.dsl,v 1.10 2001/05/16 23:37:25 hholzgra Exp $
;;
;; Returns the depth of the auto-generated TOC (table of contents) that
@@ -146,6 +146,23 @@
(element (funcprototype varargs)
(make sequence ( literal " (...)" )))
+
+
+(element type
+ (let* ((orig-name (data (current-node)))
+ (type-name (cond
+
+((equal-ci? orig-name "float") "double")
+
+((equal-ci? orig-name "int") "integer")
+ (else
+orig-name)))
+ (linkend (string-append "language.types." type-name))
+ (target (element-with-id linkend))
+ )
+ (make element gi: "A"
+ attributes: (list (list "HREF" (href-to
+target)))
+ ($bold-seq$ (make sequence (process-children)
+) )
+ )
+ )
+ )
(element function