Changeset 36655 in project


Ignore:
Timestamp:
09/23/18 22:05:51 (3 weeks ago)
Author:
mario
Message:

man/5/Module (chicken syntax): fix indentation (replace tabs by spaces)

Apparently tabs causes indentation issues in the wiki.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • wiki/man/5/Module (chicken syntax)

    r35529 r36655  
    9797    (lambda (exp rename compare)
    9898      (let ((clauses (cdr exp)))
    99         (if (null? clauses)
    100             `(,(rename 'quote) unspecified)
    101             (let* ((first (car clauses))
    102                    (rest (cdr clauses))
    103                    (test (car first)))
    104               (cond ((and (symbol? test)
    105                           (compare test (rename 'else)))
    106                      `(,(rename 'begin) ,@(cdr first)))
    107                     (else `(,(rename 'if)
    108                             ,test
    109                              (,(rename 'begin) ,@(cdr first))
    110                              (,(r 'cond) ,@rest)))))))))
     99        (if (null? clauses)
     100            `(,(rename 'quote) unspecified)
     101            (let* ((first (car clauses))
     102                   (rest (cdr clauses))
     103                   (test (car first)))
     104              (cond ((and (symbol? test)
     105                          (compare test (rename 'else)))
     106                     `(,(rename 'begin) ,@(cdr first)))
     107                    (else `(,(rename 'if)
     108                            ,test
     109                             (,(rename 'begin) ,@(cdr first))
     110                             (,(r 'cond) ,@rest)))))))))
    111111
    112112In this example the identifier {{else}} is renamed before being passed
Note: See TracChangeset for help on using the changeset viewer.