/[climacs]/climacs/packages.lisp
ViewVC logotype

Contents of /climacs/packages.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.98 - (hide annotations)
Mon Jun 5 21:01:51 2006 UTC (7 years, 10 months ago) by thenriksen
Branch: MAIN
Changes since 1.97: +1 -1 lines
Added `fill-region' function and used it to implement filling of
strings in the Lisp syntax. I have not implemented a Fill Region
command because it seemed to fit poorly within the way filling works
in Climacs.
1 strandh 1.1 ;;; -*- Mode: Lisp; Package: COMMON-LISP-USER -*-
2    
3 mvilleneuve 1.29 ;;; (c) copyright 2004-2005 by
4 strandh 1.6 ;;; Robert Strandh (strandh@labri.fr)
5 mvilleneuve 1.29 ;;; (c) copyright 2005 by
6     ;;; Matthieu Villeneuve (matthieu.villeneuve@free.fr)
7 strandh 1.1
8     ;;; This library is free software; you can redistribute it and/or
9     ;;; modify it under the terms of the GNU Library General Public
10     ;;; License as published by the Free Software Foundation; either
11     ;;; version 2 of the License, or (at your option) any later version.
12     ;;;
13     ;;; This library is distributed in the hope that it will be useful,
14     ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
15     ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16     ;;; Library General Public License for more details.
17     ;;;
18     ;;; You should have received a copy of the GNU Library General Public
19     ;;; License along with this library; if not, write to the
20     ;;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21     ;;; Boston, MA 02111-1307 USA.
22    
23     ;;; Package definitions for the Climacs editor.
24    
25     (defpackage :climacs-buffer
26 abakic 1.41 (:use :clim-lisp :flexichain :binseq)
27 strandh 1.1 (:export #:buffer #:standard-buffer
28     #:mark #:left-sticky-mark #:right-sticky-mark
29     #:standard-left-sticky-mark #:standard-right-sticky-mark
30 rstrandh 1.50 #:clone-mark
31     #:no-such-offset #:offset-before-beginning #:offset-after-end
32     #:invalid-motion #:motion-before-beginning #:motion-after-end
33     #:size #:number-of-lines
34 strandh 1.1 #:offset #:mark< #:mark<= #:mark= #:mark> #:mark>=
35 rstrandh 1.47 #:forward-object #:backward-object
36 strandh 1.1 #:beginning-of-buffer #:end-of-buffer
37     #:beginning-of-buffer-p #:end-of-buffer-p
38     #:beginning-of-line #:end-of-line
39     #:beginning-of-line-p #:end-of-line-p
40 mvilleneuve 1.31 #:buffer-line-number #:buffer-column-number
41 strandh 1.1 #:line-number #:column-number
42 strandh 1.3 #:insert-buffer-object #:insert-buffer-sequence
43 thenriksen 1.90 #:buffer-substring
44 abakic 1.24 #:insert-object #:insert-sequence
45 strandh 1.3 #:delete-buffer-range #:delete-range
46 strandh 1.1 #:delete-region
47 strandh 1.3 #:buffer-object #:buffer-sequence
48 rstrandh 1.7 #:object-before #:object-after #:region-to-sequence
49 abakic 1.41 #:low-mark #:high-mark #:modified-p #:clear-modify
50    
51 abakic 1.56 #:binseq-buffer #:obinseq-buffer #:binseq2-buffer
52 abakic 1.51 #:persistent-left-sticky-mark #:persistent-right-sticky-mark
53 abakic 1.56 #:persistent-left-sticky-line-mark #:persistent-right-sticky-line-mark
54     #:p-line-mark-mixin #:buffer-line-offset
55 abakic 1.51
56     #:delegating-buffer #:implementation))
57 strandh 1.1
58     (defpackage :climacs-base
59     (:use :clim-lisp :climacs-buffer)
60 mvilleneuve 1.28 (:export #:do-buffer-region
61 thenriksen 1.87 #:do-buffer-region-lines
62 rstrandh 1.25 #:previous-line #:next-line
63 strandh 1.1 #:open-line #:kill-line
64 mvilleneuve 1.35 #:empty-line-p
65     #:line-indentation
66 mvilleneuve 1.36 #:buffer-display-column
67 rstrandh 1.11 #:number-of-lines-in-region
68 rstrandh 1.15 #:constituentp #:whitespacep
69 strandh 1.4 #:forward-word #:backward-word
70 rstrandh 1.15 #:delete-word #:backward-delete-word
71 mvilleneuve 1.43 #:buffer-region-case
72     #:upcase-buffer-region #:upcase-region
73     #:downcase-buffer-region #:downcase-region
74     #:capitalize-buffer-region #:capitalize-region
75 rstrandh 1.26 #:upcase-word #:downcase-word #:capitalize-word
76 mvilleneuve 1.31 #:tabify-region #:untabify-region
77 mvilleneuve 1.35 #:indent-line
78 thenriksen 1.87 #:indent-region
79 mvilleneuve 1.34 #:delete-indentation
80 thenriksen 1.98 #:fill-line #:fill-region
81 rstrandh 1.17 #:input-from-stream #:output-to-stream
82 rstrandh 1.20 #:name-mixin #:name
83 abakic 1.49 #:buffer-looking-at #:looking-at
84 rstrandh 1.20 #:buffer-search-forward #:buffer-search-backward
85 abakic 1.73 #:buffer-re-search-forward #:buffer-re-search-backward
86     #:search-forward #:search-backward
87     #:re-search-forward #:re-search-backward))
88 strandh 1.1
89 strandh 1.2 (defpackage :climacs-abbrev
90     (:use :clim-lisp :clim :climacs-buffer :climacs-base)
91     (:export #:abbrev-expander #:dictionary-abbrev-expander #:dictionary
92 rstrandh 1.27 #:expand-abbrev #:abbrev-mixin #:possibly-expand-abbrev
93     #:add-abbrev))
94 strandh 1.2
95 rstrandh 1.8 (defpackage :climacs-syntax
96 rstrandh 1.16 (:use :clim-lisp :clim :climacs-buffer :climacs-base :flexichain)
97 rstrandh 1.30 (:export #:syntax #:define-syntax
98 thenriksen 1.88 #:eval-option
99     #:define-option-for-syntax
100 dmurray 1.78 #:syntax-from-name
101 rstrandh 1.32 #:basic-syntax
102 rstrandh 1.46 #:update-syntax #:update-syntax-for-display
103 rstrandh 1.57 #:grammar #:grammar-rule #:add-rule
104     #:parser #:initial-state
105 rstrandh 1.53 #:advance-parse
106 rstrandh 1.57 #:parse-tree #:start-offset #:end-offset
107     #:lexer #:nb-lexemes #:lexeme #:insert-lexeme
108     #:incremental-lexer #:next-lexeme
109     #:delete-invalid-lexemes #:inter-lexeme-object-p
110     #:skip-inter-lexeme-objects #:update-lex
111 rstrandh 1.55 #:parse-stack-top #:target-parse-tree #:parse-state-empty-p
112 rstrandh 1.53 #:parse-stack-next #:parse-stack-symbol
113     #:parse-stack-parse-trees #:map-over-parse-trees
114 rstrandh 1.63 #:no-such-operation #:no-expression
115 dmurray 1.82 #:name-for-info-pane
116 mvilleneuve 1.35 #:syntax-line-indentation
117 rstrandh 1.63 #:forward-expression #:backward-expression
118 rstrandh 1.64 #:eval-defun
119 dmurray 1.74 #:beginning-of-definition #:end-of-definition
120 rstrandh 1.58 #:redisplay-pane-with-syntax
121 dmurray 1.74 #:backward-paragraph #:forward-paragraph
122     #:backward-sentence #:forward-sentence
123 dmurray 1.75 #:forward-list #:backward-list
124     #:down-list #:up-list
125     #:backward-down-list #:backward-up-list
126 rstrandh 1.72 #:syntax-line-comment-string
127     #:line-comment-region #:comment-region
128     #:line-uncomment-region #:uncomment-region))
129 rstrandh 1.8
130 ejohnson 1.12 (defpackage :climacs-kill-ring
131 ejohnson 1.22 (:use :clim-lisp :flexichain)
132 dmurray 1.76 (:export #:kill-ring #:kill-ring-length #:kill-ring-max-size
133     #:append-next-p
134 ejohnson 1.22 #:reset-yank-position #:rotate-yank-position #:kill-ring-yank
135 dmurray 1.74 #:kill-ring-standard-push #:kill-ring-concatenating-push
136     #:kill-ring-reverse-concatenating-push))
137 ejohnson 1.12
138 rstrandh 1.40 (defpackage :undo
139     (:use :common-lisp)
140     (:export #:no-more-undo
141     #:undo-tree #:standard-undo-tree
142     #:undo-record #:standard-undo-record
143     #:add-undo #:flip-undo-record #:undo #:redo))
144    
145 rstrandh 1.32 (defpackage :climacs-pane
146     (:use :clim-lisp :clim :climacs-buffer :climacs-base :climacs-abbrev
147 dmurray 1.96 :climacs-syntax :flexichain :undo)
148 dmurray 1.92 (:export #:climacs-buffer #:needs-saving
149     #:filepath #:file-saved-p #:file-write-time
150 dmurray 1.79 #:read-only-p #:buffer-read-only
151 rstrandh 1.32 #:climacs-pane #:point #:mark
152 thenriksen 1.89 #:clear-cache
153 rstrandh 1.32 #:redisplay-pane #:full-redisplay
154 dmurray 1.77 #:display-cursor
155 dmurray 1.93 #:display-region
156 rstrandh 1.32 #:page-down #:page-up
157 rstrandh 1.54 #:top #:bot
158     #:tab-space-count #:space-width #:tab-width
159 mvilleneuve 1.35 #:indent-tabs-mode
160 mvilleneuve 1.36 #:auto-fill-mode #:auto-fill-column
161 mvilleneuve 1.44 #:isearch-state #:search-string #:search-mark
162     #:search-forward-p #:search-success-p
163 mvilleneuve 1.38 #:isearch-mode #:isearch-states #:isearch-previous-string
164 mvilleneuve 1.42 #:query-replace-state #:string1 #:string2
165     #:query-replace-mode
166 dmurray 1.93 #:region-visible-p
167 rstrandh 1.40 #:with-undo
168 mretzlaff 1.80 #:url
169     #:climacs-textual-view #:+climacs-textual-view+))
170 rstrandh 1.53
171 thenriksen 1.84 (defpackage :climacs-gui
172 tmoore 1.85 (:use :clim-lisp :clim :climacs-buffer :climacs-base
173 dmurray 1.96 :climacs-abbrev :climacs-syntax
174 thenriksen 1.84 :climacs-kill-ring :climacs-pane :clim-extensions :undo :esa)
175     ;;(:import-from :lisp-string)
176     (:export :climacs ; Main entry point.
177     ;; GUI functions follow.
178 thenriksen 1.91 :climacs-rv ; Entry point with alternate colors.
179 thenriksen 1.84 :current-window
180 thenriksen 1.97 :current-buffer
181 thenriksen 1.84 :point
182     :syntax
183     :mark
184     :insert-character))
185    
186 thenriksen 1.95 (defpackage :climacs-fundamental-syntax
187     (:use :clim-lisp :clim :climacs-buffer :climacs-base
188     :climacs-syntax :flexichain :climacs-pane)
189     (:export #:fundamental-syntax))
190    
191 rstrandh 1.53 (defpackage :climacs-html-syntax
192     (:use :clim-lisp :clim :climacs-buffer :climacs-base
193     :climacs-syntax :flexichain :climacs-pane))
194 rstrandh 1.32
195 crhodes 1.60 (defpackage :climacs-prolog-syntax
196     (:use :clim-lisp :clim :climacs-buffer :climacs-base
197     :climacs-syntax :flexichain :climacs-pane)
198 tmoore 1.85 (:shadow #:atom #:close #:exp #:integer #:open #:variable))
199 pfong 1.61
200     (defpackage :climacs-cl-syntax
201 rstrandh 1.63 (:use :clim-lisp :clim :climacs-buffer :climacs-base
202     :climacs-syntax :flexichain :climacs-pane)
203     (:export))
204    
205     (defpackage :climacs-lisp-syntax
206 tmoore 1.85 (:use :clim-lisp :clim :clim-extensions :climacs-buffer :climacs-base
207 thenriksen 1.84 :climacs-syntax :flexichain :climacs-pane :climacs-gui)
208 dmurray 1.71 (:export :lisp-string))
209 crhodes 1.60
210 rstrandh 1.66

  ViewVC Help
Powered by ViewVC 1.1.5