source: project/chicken/trunk/chicken-base.scm @ 14653

Last change on this file since 14653 was 14653, checked in by felix winkelmann, 11 years ago

case-lambda uses eq? instead of =; started convenience module chicken-base

File size: 8.3 KB
Line 
1;;;; chicken-base.scm - convenience wrapper module for various often used modules
2;
3; Copyright (c) 2009, The Chicken Team
4; All rights reserved.
5;
6; Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following
7; conditions are met:
8;
9;   Redistributions of source code must retain the above copyright notice, this list of conditions and the following
10;     disclaimer.
11;   Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following
12;     disclaimer in the documentation and/or other materials provided with the distribution.
13;   Neither the name of the author nor the names of its contributors may be used to endorse or promote
14;     products derived from this software without specific prior written permission.
15;
16; THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS
17; OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
18; AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
19; CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
20; CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
21; SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22; THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
23; OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
24; POSSIBILITY OF SUCH DAMAGE.
25
26
27(require-library
28 extras data-structures ports files utils)
29
30
31(module chicken-base 
32
33    ;; scheme
34    (not boolean? eq? eqv? equal? pair?
35         cons car cdr caar cadr cdar cddr caaar caadr cadar caddr cdaar cdadr
36         cddar cdddr caaaar caaadr caadar caaddr cadaar cadadr caddar cadddr cdaaar
37         cdaadr cdadar cdaddr cddaar cddadr cdddar cddddr set-car! set-cdr!
38         null? list? list length list-tail list-ref append reverse memq memv
39         member assq assv assoc symbol? symbol->string string->symbol number?
40         integer? exact? real? complex? inexact? rational? zero? odd? even?
41         positive? negative?  max min + - * / = > < >= <= quotient remainder
42         modulo gcd lcm abs floor ceiling truncate round exact->inexact
43         inexact->exact exp log expt sqrt sin cos tan asin acos atan
44         number->string string->number char? char=? char>? char<? char>=?
45         char<=? char-ci=? char-ci<? char-ci>?  char-ci>=? char-ci<=?
46         char-alphabetic? char-whitespace? char-numeric? char-upper-case?
47         char-lower-case? char-upcase char-downcase char->integer integer->char
48         string? string=?  string>? string<? string>=? string<=? string-ci=?
49         string-ci<? string-ci>? string-ci>=? string-ci<=?  make-string
50         string-length string-ref string-set! string-append string-copy
51         string->list list->string substring string-fill! vector? make-vector
52         vector-ref vector-set! string vector vector-length vector->list
53         list->vector vector-fill! procedure? map for-each apply force
54         call-with-current-continuation input-port? output-port?
55         current-input-port current-output-port call-with-input-file
56         call-with-output-file open-input-file open-output-file
57         close-input-port close-output-port load read eof-object? read-char
58         peek-char write display write-char newline with-input-from-file
59         with-output-to-file dynamic-wind values call-with-values eval
60         char-ready? imag-part real-part magnitude numerator denominator
61         scheme-report-environment null-environment interaction-environment
62         er-macro-transformer
63
64         ;; chicken     
65         abort
66         add1
67         argc+argv
68         argv
69         arithmetic-shift
70         bit-set?
71         bitwise-and
72         bitwise-ior
73         bitwise-not
74         bitwise-xor
75         blob->string
76         blob-size
77         blob?
78         blob=?
79         breakpoint
80         build-platform
81         c-runtime
82         call/cc
83         case-sensitive
84         char-name
85         chicken-home
86         chicken-version
87         command-line-arguments
88         condition-predicate
89         condition-property-accessor
90         condition?
91         continuation-capture
92         continuation-graft
93         continuation-return
94         continuation?
95         copy-read-table
96         cpu-time
97         current-error-port
98         current-exception-handler
99         current-gc-milliseconds
100         current-milliseconds
101         current-read-table
102         current-seconds
103         define-reader-ctor
104         delete-file
105         enable-warnings
106         errno
107         error
108         exit
109         exit-handler
110         expand
111         extension-information
112         feature?
113         features
114         file-exists?
115         fixnum-bits
116         fixnum-precision
117         fixnum?
118         flonum-decimal-precision
119         flonum-epsilon
120         flonum-maximum-decimal-exponent
121         flonum-maximum-exponent
122         flonum-minimum-decimal-exponent
123         flonum-minimum-exponent
124         flonum-precision
125         flonum-print-precision
126         flonum-radix
127         flonum?
128         flush-output
129         force-finalizers
130         fp-
131         fp*
132         fp/
133         fp+
134         fp<
135         fp<=
136         fp=
137         fp>
138         fp>=
139         fpmax
140         fpmin
141         fpneg
142         fx-
143         fx*
144         fx/
145         fx+
146         fx<
147         fx<=
148         fx=
149         fx>
150         fx>=
151         fxand
152         fxior
153         fxmax
154         fxmin
155         fxmod
156         fxneg
157         fxnot
158         fxshl
159         fxshr
160         fxxor
161         gc
162         gensym
163         get
164         get-call-chain
165         get-environment-variable
166         get-keyword
167         get-output-string
168         get-properties
169         getenv
170         getter-with-setter
171         implicit-exit-handler
172         keyword->string
173         keyword-style
174         keyword?
175         load-library
176         load-relative
177         load-verbose
178         machine-byte-order
179         machine-type
180         make-blob
181         make-composite-condition
182         make-parameter
183         make-property-condition
184         maximum-flonum
185         memory-statistics
186         minimum-flonum
187         most-negative-fixnum
188         most-positive-fixnum
189         on-exit
190         open-input-string
191         open-output-string
192         parentheses-synonyms
193         port-name
194         port-position
195         port?
196         print
197         print-call-chain
198         print-error-message
199         print*
200         procedure-information
201         program-name
202         promise?
203         put!
204         register-feature!
205         remprop!
206         rename-file
207         repl
208         repl-prompt
209         repository-path
210         require
211         reset
212         reset-handler
213         return-to-host
214         reverse-list->string
215         set-finalizer!
216         set-gc-report!
217         set-parameterized-read-syntax!
218         set-port-name!
219         set-read-syntax!
220         set-sharp-read-syntax!
221         setter
222         signal
223         signum
224         singlestep
225         software-type
226         software-version
227         string->blob
228         string->keyword
229         string->uninterned-symbol
230         strip-syntax
231         sub1
232         symbol-escape
233         symbol-plist
234         syntax-error
235         system
236         unregister-feature!
237         vector-resize
238         void
239         warning
240         eval-handler
241         dynamic-load-libraries
242         with-exception-handler
243
244         ;; extras
245         format
246         fprintf
247         pp
248         pretty-print
249         pretty-print-width
250         printf
251         random
252         random-seed
253         randomize
254         read-byte
255         read-file
256         read-line
257         read-lines
258         read-string
259         read-string!
260         read-token
261         sprintf
262         write-byte
263         write-line
264         write-string
265
266         ;; files
267         delete-file*
268         file-copy
269         file-move
270         make-pathname
271         directory-null?
272         make-absolute-pathname
273         create-temporary-file
274         decompose-pathname
275         absolute-pathname?
276         pathname-directory
277         pathname-extension
278         pathname-file
279         pathname-replace-directory
280         pathname-replace-extension
281         pathname-replace-file
282         pathname-strip-directory
283         pathname-strip-extension
284         normalize-pathname
285
286         ;; ports
287         call-with-input-string
288         call-with-output-string
289         make-input-port
290         make-output-port
291         port-for-each
292         port-map
293         port-fold
294         make-broadcast-port
295         make-concatenated-port
296         with-error-output-to-port
297         with-input-from-port
298         with-input-from-string
299         with-output-to-port
300         with-output-to-string
301         with-error-output-to-port
302
303         ;;data-structures
304         ->string
305         alist-ref
306         alist-update!
307         always?
308         any?
309         atom?
310         binary-search
311         butlast
312         chop
313         complement
314         compose
315         compress
316         conc
317         conjoin
318         constantly
319         disjoin
320         each
321         flatten
322         flip
323         identity
324         intersperse
325         join
326         left-section
327         list->queue
328         list-of?
329         make-queue
330         merge
331         merge!
332         never?
333         none?
334         noop
335         o
336         project
337         queue->list
338         queue-add!
339         queue-empty?
340         queue-first
341         queue-last
342         queue-push-back!
343         queue-push-back-list!
344         queue-remove!
345         queue?
346         rassoc
347         right-section
348         shuffle
349         sort
350         sort!
351         sorted?
352         string-chomp
353         string-chop
354         string-compare3
355         string-compare3-ci
356         string-intersperse
357         string-split
358         string-translate
359         string-translate*
360         substring-ci=?
361         substring-index
362         substring-index-ci
363         substring=?
364         tail?
365
366         ;; utils
367         for-each-argv-line
368         for-each-line
369         read-all
370         system*
371         qs)
372
373  (import scheme chicken data-structures utils ports files extras)
374
375  )
Note: See TracBrowser for help on using the repository browser.