Mercurial > emacs
comparison lisp/emacs-lisp/tcover-ses.el @ 87114:a4e9022bb904
Re-fill copyright.
Remove directory part from filenames in function declarations.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Thu, 06 Dec 2007 04:06:27 +0000 |
parents | fc93e9674475 |
children | 107ccd98fa12 |
comparison
equal
deleted
inserted
replaced
87113:aa25402f888a | 87114:a4e9022bb904 |
---|---|
1 ;;;; testcover-ses.el -- Example use of `testcover' to test "SES" | 1 ;;;; testcover-ses.el -- Example use of `testcover' to test "SES" |
2 | 2 |
3 ;; Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007 Free Software Foundation, Inc. | 3 ;; Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007 |
4 ;; Free Software Foundation, Inc. | |
4 | 5 |
5 ;; Author: Jonathan Yavner <jyavner@engineer.com> | 6 ;; Author: Jonathan Yavner <jyavner@engineer.com> |
6 ;; Maintainer: Jonathan Yavner <jyavner@engineer.com> | 7 ;; Maintainer: Jonathan Yavner <jyavner@engineer.com> |
7 ;; Keywords: spreadsheet lisp utility | 8 ;; Keywords: spreadsheet lisp utility |
8 | 9 |
24 (require 'testcover) | 25 (require 'testcover) |
25 | 26 |
26 (defvar ses-initial-global-parameters) | 27 (defvar ses-initial-global-parameters) |
27 (defvar ses-mode-map) | 28 (defvar ses-mode-map) |
28 | 29 |
29 (declare-function ses-set-curcell "../ses") | 30 (declare-function ses-set-curcell "ses") |
30 (declare-function ses-update-cells "../ses") | 31 (declare-function ses-update-cells "ses") |
31 (declare-function ses-load "../ses") | 32 (declare-function ses-load "ses") |
32 (declare-function ses-vector-delete "../ses") | 33 (declare-function ses-vector-delete "ses") |
33 (declare-function ses-create-header-string "../ses") | 34 (declare-function ses-create-header-string "ses") |
34 (declare-function ses-read-cell "../ses") | 35 (declare-function ses-read-cell "ses") |
35 (declare-function ses-read-symbol "../ses") | 36 (declare-function ses-read-symbol "ses") |
36 (declare-function ses-command-hook "../ses") | 37 (declare-function ses-command-hook "ses") |
37 (declare-function ses-jump "../ses") | 38 (declare-function ses-jump "ses") |
38 | 39 |
39 | 40 |
40 ;;;Here are some macros that exercise SES. Set `pause' to t if you want the | 41 ;;;Here are some macros that exercise SES. Set `pause' to t if you want the |
41 ;;;macros to pause after each step. | 42 ;;;macros to pause after each step. |
42 (let* ((pause nil) | 43 (let* ((pause nil) |