[PHP-DOC] cvs: phpdoc / html-common.dsl From: Hartmut Holzgraefe (hartmut <email protected>)
Date: 05/16/01

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