fez-lisp 1.6.12 → 1.6.14

package/package.json

@@ -2,7 +2,7 @@
   "name": "fez-lisp",
   "description": "Lisp interpreted & compiled to JavaScript",
   "author": "AT290690",
-  "version": "1.6.12",
+  "version": "1.6.14",
   "type": "module",
   "main": "index.js",
   "keywords": [

package/src/check.js

@@ -2,7 +2,6 @@ import {
   APPLY,
   ATOM,
   FALSE,
-  GETTERS_SET,
   KEYWORDS,
   MUTATION_SUFFIX,
   MUTATORS_SET,
@@ -847,23 +846,23 @@ const resolveReturnType = ({
         break
       default:
         {
-          if (
-            !GETTERS_SET.has(name) &&
-            GETTERS_SET.has(returns[VALUE]) &&
-            !resolveGetter({ rem, prop, name, env })
-          )
-            return retry(env[name][STATS], [returns, env], stack, () => {
-              resolveReturnType({
-                returns,
-                rem,
-                stack,
-                prop,
-                exp,
-                name,
-                env,
-                check
-              })
-            })
+          // if (
+          //   !GETTERS_SET.has(name) &&
+          //   GETTERS_SET.has(returns[VALUE]) &&
+          //   !resolveGetter({ rem, prop, name, env })
+          // )
+          //   return retry(env[name][STATS], [returns, env], stack, () => {
+          //     resolveReturnType({
+          //       returns,
+          //       rem,
+          //       stack,
+          //       prop,
+          //       exp,
+          //       name,
+          //       env,
+          //       check
+          //     })
+          //   })
           checkPredicateNameDeep(name, exp, exp.slice(1), returns)
           // TODO: DRY
           const index = env[name][STATS][ARGUMENTS]

package/src/keywords.js

@@ -115,19 +115,7 @@ export const MUTATORS_SET = new Set([
 ])
 export const GETTERS_SET = new Set([
   KEYWORDS.GET_ARRAY,
-  'array:first',
-  'array:second',
-  'array:third',
-  'array:last',
-  'matrix:get',
-  'matrix:set-and-get!',
-  'array:set-and-get!',
-  'var:set-and-get!',
-  'map:set-and-get!',
-  'set:add-and-get!',
-  'set:get',
-  'map:get',
-  'array:get',
-  'array:pop!',
-  'var:get'
+  'array:get-number',
+  'array:get-array',
+  'array:get-boolean'
 ])

package/src/utils.js

@@ -318,6 +318,7 @@ export const ast = (source, deps) =>
 
 export const astWithStd = (source) => wrapInBlock(shake(prep(source), std))
 export const unwrapped = (source) => shake(prep(source), std)
+export const unwrapDo = (ast) => ast[1][1]
 export const parse = (source) =>
   wrapInBlock(
     shake(
@@ -348,6 +349,14 @@ export const addTypeIdentities = (ast) => {
     identity(STATIC_TYPES.UNKNOWN)
   )
 }
+export const isInputVariable = (x) =>
+  x &&
+  x[0] &&
+  x[0][TYPE] === APPLY &&
+  x[0][VALUE] === 'let' &&
+  x[1] &&
+  x[1][TYPE] === WORD &&
+  x[1][VALUE] === 'INPUT'
 
 export const UTILS = {
   handleUnbalancedQuotes,