mirrors/madlisp
1
0
Fork 0
mirror of https://github.com/peklaiho/madlisp.git synced 2024-11-23 05:45:06 +00:00
Code Issues Packages Projects Releases Wiki Activity

rename splice-unquote to unquote-splice

Browse Source
This commit is contained in:
Pekka Laiho 2020-12-05 17:22:50 +07:00
parent dae6fe455f
commit a2f5cdbcc0
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Evaller.php
View File

@ -382,7 +382,7 @@ class Evaller
for ($i = count($data) - 1; $i >= 0; $i--) { for ($i = count($data) - 1; $i >= 0; $i--) {
$elt = $data[$i]; $elt = $data[$i];
if ($elt instanceof MList && count($elt->getData()) > 0 && $elt->get(0) instanceof Symbol && $elt->get(0)->getName() == 'splice-unquote') { if ($elt instanceof MList && count($elt->getData()) > 0 && $elt->get(0) instanceof Symbol && $elt->get(0)->getName() == 'unquote-splice') {
if (count($elt->getData()) == 2) { if (count($elt->getData()) == 2) {
$result = new MList([ $result = new MList([
new Symbol('concat'), new Symbol('concat'),
@ -390,7 +390,7 @@ class Evaller
$result $result
]); ]);
} else { } else {
throw new MadLispException("splice-unquote requires exactly 1 argument"); throw new MadLispException("unquote-splice requires exactly 1 argument");
} }
} else { } else {
$result = new MList([ $result = new MList([