1 | static bool lispEqic(Lisp a, Lisp b) {
|
2 | if (a == null) ret b == null; |
3 | if (neqic(a.head, b.head)) false; |
4 | int n = l(a.args); |
5 | if (n != l(b.args)) false; |
6 | for i to n: |
7 | if (!lispEqic(a.args.get(i), b.args.get(i))) false; |
8 | true; |
9 | } |
10 | |
11 | static bool lispEqic(Lisp a, S b) {
|
12 | if (a == null) ret b == null; |
13 | ret nempty(a.args) && eqic(a.head, b); |
14 | } |
download show line numbers debug dex old transpilations
Travelled to 14 computer(s): aoiabmzegqzx, bhatertpkbcr, cbybwowwnfue, cfunsshuasjs, gwrvuhgaqvyk, ishqpsrjomds, lpdgvwnxivlt, mqqgnosmbjvj, ppjhyzlbdabe, pyentgdyhuwx, pzhvpgtvlbxg, tslmcundralx, tvejysmllsmz, vouqrxazstgt
No comments. add comment
| Snippet ID: | #1007822 |
| Snippet name: | lispEqic - Lisp equality ignoring case |
| Eternal ID of this version: | #1007822/2 |
| Text MD5: | 46dee3fc864009a2c87d975f34a8877f |
| Author: | stefan |
| Category: | javax |
| Type: | JavaX fragment (include) |
| Public (visible to everyone): | Yes |
| Archived (hidden from active list): | No |
| Created/modified: | 2017-08-20 23:31:25 |
| Source code size: | 363 bytes / 14 lines |
| Pitched / IR pitched: | No / No |
| Views / Downloads: | 686 / 822 |
| Version history: | 1 change(s) |
| Referenced in: | [show references] |