simulacrumparty
/
sexp-template
Bevaka 1
Stjärnmärk 0
Förgrening 0
Kod Släpp 0 Aktiviteter
Bläddra i källkod

Rename head/tail to first/rest 

Trying to avoid conflict with the <head> tag
master
Dylan Baker 7 år sedan
förälder
fb75ea9bc2
incheckning
a0ac2606ec
2 ändrade filer med 4 tillägg och 4 borttagningar
Unifierad Vy Visa Diff Statistik
  1. 2
    2
      src/core.js
  2. 2
    2
      test/coreTest.js

+ 2
- 2
src/core.js Visa fil

14 
   list: (...args) => new AST.List({ elements: args }),
 14 
   list: (...args) => new AST.List({ elements: args }),
15 
   length: xs => new AST.Number({ value: xs.elements.length }),
 15 
   length: xs => new AST.Number({ value: xs.elements.length }),
16 
   cons: (x, xs) => new AST.List({ elements: [x, ...xs.elements] }),
 16 
   cons: (x, xs) => new AST.List({ elements: [x, ...xs.elements] }),
17 
-  head: xs => xs.elements[0],
18 
-  tail: xs => new AST.List({ elements: xs.elements.slice(1) }),
17 
+  first: xs => xs.elements[0],
18 
+  rest: xs => new AST.List({ elements: xs.elements.slice(1) }),
19 
 }
 19 
 }

+ 2
- 2
test/coreTest.js Visa fil

35 
         (if (= (length xs) 0)
 35 
         (if (= (length xs) 0)
36 
           (list)
 36 
           (list)
37 
           (cons
 37 
           (cons
38 
-            (f (head xs))
39 
-            (my-map f (tail xs))))))
38 
+            (f (first xs))
39 
+            (my-map f (rest xs))))))
40
40
41 
     (my-map (lambda (x) (+ x 1)) (list 1 2 3))
 41 
     (my-map (lambda (x) (+ x 1)) (list 1 2 3))
42 
   `)
 42 
   `)

Write Förhandsgranska
Laddar…
Avbryt
Spara