summaryrefslogtreecommitdiff
path: root/lists.js
diff options
context:
space:
mode:
authorErik Olsson <eolsson@gmail.com>2014-12-14 18:48:03 +0100
committerErik Olsson <eolsson@gmail.com>2014-12-14 18:48:03 +0100
commit57bef2b736f14cf25d6edd23ec4336d3c7146b5c (patch)
tree8ee587603ee410a67c4dc6394db18cb4be35c26a /lists.js
parent43626c46519d88acb415e76c49b4983907de9dcd (diff)
parent0a239b703c8c7fde5540ce63c4236522a22ee049 (diff)
downloadsnap-byow-57bef2b736f14cf25d6edd23ec4336d3c7146b5c.tar.gz
snap-byow-57bef2b736f14cf25d6edd23ec4336d3c7146b5c.zip
Merge remote-tracking branch 'upstream/master'
Diffstat (limited to 'lists.js')
-rw-r--r--lists.js5
1 files changed, 4 insertions, 1 deletions
diff --git a/lists.js b/lists.js
index a4aff6c..bd856fe 100644
--- a/lists.js
+++ b/lists.js
@@ -61,7 +61,7 @@ PushButtonMorph, SyntaxElementMorph, Color, Point, WatcherMorph,
StringMorph, SpriteMorph, ScrollFrameMorph, CellMorph, ArrowMorph,
MenuMorph, snapEquals, Morph, isNil, localize, MorphicPreferences*/
-modules.lists = '2014-July-28';
+modules.lists = '2014-November-20';
var List;
var ListWatcherMorph;
@@ -125,6 +125,9 @@ List.prototype.changed = function () {
List.prototype.cons = function (car, cdr) {
var answer = new List();
+ if (!(cdr instanceof List || isNil(cdr))) {
+ throw new Error("cdr isn't a list: " + cdr);
+ }
answer.first = isNil(car) ? null : car;
answer.rest = cdr || null;
answer.isLinked = true;