Last change
on this file since 25672 was
25672,
checked in by Alan Post, 9 years ago
|
genturfahi: Add utf8 support.
I call string-ref, which is now o(n) rather than o(1). This needs
to be fixed by splitting the string into a list.
I would like to support UTF8 in my grammar, which will require
rebuilding the bootstrap code, now that I support UTF8 in the
parser.
|
File size:
1.2 KB
|
Line | |
---|
1 | ;;;; |
---|
2 | ;;;; genturfahi - lo la .ckim. ke pe'a jajgau ratcu ke'e genturfa'i |
---|
3 | ;;;; `-> A Scheme packrat parser. |
---|
4 | ;;;; |
---|
5 | ;;;; Copyright (c) 2010 ".alyn.post." <alyn.post@lodockikumazvati.org> |
---|
6 | ;;;; |
---|
7 | ;;;; Permission to use, copy, modify, and/or distribute this software for any |
---|
8 | ;;;; purpose with or without fee is hereby granted, provided that the above |
---|
9 | ;;;; copyright notice and this permission notice appear in all copies. |
---|
10 | ;;;; |
---|
11 | ;;;; THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
---|
12 | ;;;; WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
---|
13 | ;;;; MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR |
---|
14 | ;;;; ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
---|
15 | ;;;; WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
---|
16 | ;;;; ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
---|
17 | ;;;; OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
---|
18 | ;;;; |
---|
19 | |
---|
20 | (include "chicken-declare.scm") |
---|
21 | |
---|
22 | (use utf8) |
---|
23 | (use srfi-28) ; Basic Format Strings |
---|
24 | (use srfi-37) ; args-fold |
---|
25 | (use extras) ; pretty-print |
---|
26 | (use genturfahi) |
---|
27 | (use genturfahi-peg) |
---|
28 | |
---|
29 | (include "license.scm") |
---|
30 | (include "main-srfi-37.scm") |
---|
31 | |
---|
32 | (main) |
---|
33 | (exit (secuxna-exit-status)) |
---|
Note: See
TracBrowser
for help on using the repository browser.