Ignore:
Timestamp:
04/24/09 07:49:03 (12 years ago)
Author:
Ivan Raikov
Message:

html-form ported to Chicken 4

Location:
release/4/html-form
Files:
1 edited
1 copied

Legend:

Unmodified
Added
Removed
  • release/4/html-form/trunk/html-form.scm

    r12782 r14413  
     1;;
     2;;
     3;; Directed graph in adjacency list format.
     4;; Based on code from MLRISC
     5;;
     6;; Copyright 2007-2009 Ivan Raikov and the Okinawa Institute of Science and Technology.
     7;;
     8;;
     9;; This program is free software: you can redistribute it and/or
     10;; modify it under the terms of the GNU General Public License as
     11;; published by the Free Software Foundation, either version 3 of the
     12;; License, or (at your option) any later version.
     13;;
     14;; This program is distributed in the hope that it will be useful, but
     15;; WITHOUT ANY WARRANTY; without even the implied warranty of
     16;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
     17;; General Public License for more details.
     18;;
     19;; A full copy of the GPL license can be found at
     20;; <http://www.gnu.org/licenses/>.
    121
    2 (require-extension srfi-1)
    3 (require-extension srfi-13)
     22(module html-form
    423
     24 (html-form)
     25                   
     26 (import scheme chicken )
    527
    6 (define-extension html-form)
    7 
    8 
    9 (declare (export html-form))
     28 (require-extension srfi-1 srfi-13 )
    1029
    1130(define nl (list->string (list #\newline)))
     
    123142             ,(if rel `(rel ,rel) `()))))
    124143
     144)
Note: See TracChangeset for help on using the changeset viewer.