annotate src/testdir/test33.ok @ 10948:67e37bdb5864 v8.0.0363

patch 8.0.0363: Travis is too slow to keep up with patches commit https://github.com/vim/vim/commit/3834e3d039777e0144914a86289870bee147c0a2 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Feb 23 20:20:53 2017 +0100 patch 8.0.0363: Travis is too slow to keep up with patches Problem: Travis is too slow to keep up with patches. Solution: Increase git depth to 20
author Christian Brabandt <cb@256bit.org>
date Thu, 23 Feb 2017 20:30:06 +0100
parents 3fc0f57ecb91
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1 (defun html-file (base)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2 (format nil "~(~A~).html" base))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4 (defmacro page (name title &rest body)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5 (let ((ti (gensym)))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6 `(with-open-file (*standard-output*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
7 (html-file ,name)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
8 :direction :output
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
9 :if-exists :supersede)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
10 (let ((,ti ,title))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
11 (as title ,ti)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
12 (with center
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
13 (as h2 (string-upcase ,ti)))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
14 (brs 3)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
15 ,@body))))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
16
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
17 ;;; Utilities for generating links
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
18
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
19 (defmacro with-link (dest &rest body)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
20 `(progn
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
21 (format t "<a href=\"~A\">" (html-file ,dest))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
22 ,@body
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
23 (princ "</a>")))