replace closure representation to use the actual word closure

igorw · igorw · commit e43a3d3e3945 · 2014-05-24T19:09:47.000+02:00
diff --git a/src/eval.php b/src/eval.php
@@ -37,12 +37,12 @@ function evaluate($exp, array $env = [])
         return $env[$exp];
     }
 
-    // procedure 'object'
-    // encoded as a 4-tuple of [λ, arg, body, env]
+    // closure 'object'
+    // encoded as a 4-tuple of ['closure', arg, body, env]
     // this is what is passed to apply
     if ('λ' === first($exp)) {
         list($_, $arg, $body) = $exp;
-        return ['λ', $arg, $body, $env];
+        return ['closure', $arg, $body, $env];
     }
 
     // function application

Original file line number	Diff line number	Diff line change
`@@ -37,12 +37,12 @@ function evaluate($exp, array $env = [])`
`37`	`37`	`return $env[$exp];`
`38`	`38`	`}`
`39`	`39`
`40`		`- // procedure 'object'`
`41`		`- // encoded as a 4-tuple of [λ, arg, body, env]`
	`40`	`+ // closure 'object'`
	`41`	`+ // encoded as a 4-tuple of ['closure', arg, body, env]`
`42`	`42`	`// this is what is passed to apply`
`43`	`43`	`if ('λ' === first($exp)) {`
`44`	`44`	`list($_, $arg, $body) = $exp;`
`45`		`- return ['λ', $arg, $body, $env];`
	`45`	`+ return ['closure', $arg, $body, $env];`
`46`	`46`	`}`
`47`	`47`
`48`	`48`	`// function application`