Libraryless. Click here for Pure Java version (397L/3K/10K).
1 | !747 |
2 | !multi-line strings |
3 | |
4 | m {
|
5 | static new L<S> rules; |
6 | static new L<S> statements; |
7 | |
8 | p {
|
9 | rules.add([["$1 is the singular of $2." <=> "$2 is the plural of $1."]]); |
10 | statements.add("house is the singular of houses.");
|
11 | process(); |
12 | print(fromLines(statements)); |
13 | } |
14 | |
15 | static void process() {
|
16 | for (S rule : rules) {
|
17 | new Matches m; |
18 | if (match3("* <=> *", rule, m)) {
|
19 | S l = m.unq(0), r = m.unq(1); |
20 | for (Map<S, S> map : matchStatements(l)) |
21 | addStatement(convert(r, map)); |
22 | } |
23 | } |
24 | } |
25 | |
26 | static L<Map<S, S>> matchStatements(S pat) {
|
27 | L<Map<S, S>> l = new ArrayList<Map<S, S>>(); |
28 | for (S s : statements) {
|
29 | Map<S, S> m = match4(pat, s); |
30 | if (m != null) l.add(m); |
31 | } |
32 | ret l; |
33 | } |
34 | |
35 | static Map<S, S> match4(S pat, S s) {
|
36 | L<S> tok1 = parse3(pat), tok2 = parse3(s); |
37 | if (tok1.size() != tok2.size()) ret null; |
38 | new Map<S, S> m; |
39 | for (int i = 1; i < tok1.size(); i += 2) {
|
40 | S t1 = tok1.get(i), t2 = tok2.get(i); |
41 | if (isVar(t1)) |
42 | m.put(t1, t2); |
43 | else if (!t1.equalsIgnoreCase(t2)) |
44 | ret null; |
45 | } |
46 | ret m; |
47 | } |
48 | |
49 | static boolean isVar(S s) {
|
50 | ret s.startsWith("$") && s.length() > 1;
|
51 | } |
52 | |
53 | static S convert(S r, Map<S, S> matches) {
|
54 | L<S> tok = javaTokPlusPeriod(r); |
55 | for (int i = 1; i < tok.size(); i += 2) {
|
56 | if (tok.get(i).startsWith("$")) {
|
57 | S m = matches.get(tok.get(i)); |
58 | if (m != null) |
59 | tok.set(i, m); |
60 | } |
61 | } |
62 | ret join(tok); |
63 | } |
64 | |
65 | static void addStatement(S s) {
|
66 | for (S st : statements) |
67 | if (match3(st, s)) |
68 | ret; |
69 | statements.add(s); |
70 | } |
71 | |
72 | !include #2000515 // unquote |
73 | !include #1001497 // parseBoolean |
74 | !include #1000709 // formatSnippetID |
75 | } |
Began life as a copy of #1001506
download show line numbers debug dex old transpilations
Travelled to 15 computer(s): aoiabmzegqzx, bhatertpkbcr, cbybwowwnfue, cfunsshuasjs, gwrvuhgaqvyk, ishqpsrjomds, lpdgvwnxivlt, mqqgnosmbjvj, onxytkatvevr, pyentgdyhuwx, pzhvpgtvlbxg, teubizvjbppd, tslmcundralx, tvejysmllsmz, vouqrxazstgt
No comments. add comment
| Snippet ID: | #1001507 |
| Snippet name: | Singular & plural (without lisp) |
| Eternal ID of this version: | #1001507/1 |
| Text MD5: | 1783a063aa8ee6d119759a82ce834042 |
| Transpilation MD5: | df17b780d33a64ef92b4e75754250ad8 |
| Author: | stefan |
| Category: | |
| Type: | JavaX source code |
| Public (visible to everyone): | Yes |
| Archived (hidden from active list): | No |
| Created/modified: | 2015-10-21 15:49:40 |
| Source code size: | 1823 bytes / 75 lines |
| Pitched / IR pitched: | No / Yes |
| Views / Downloads: | 544 / 604 |
| Referenced in: | [show references] |