kopia lustrzana https://github.com/backface/turtlestitch
rodzic
ea05f7859f
commit
89c2835130
|
@ -2321,3 +2321,7 @@ ______
|
||||||
141117
|
141117
|
||||||
------
|
------
|
||||||
* Threads, Blocks: Treat REPORT blocks inside custom command definitions as STOP THIS BLOCK / IGNORE INPUTS
|
* Threads, Blocks: Treat REPORT blocks inside custom command definitions as STOP THIS BLOCK / IGNORE INPUTS
|
||||||
|
|
||||||
|
141120
|
||||||
|
------
|
||||||
|
* Lists: Fixed #642, avoid “freezing” when calling CONS on non-list/null
|
||||||
|
|
5
lists.js
5
lists.js
|
@ -61,7 +61,7 @@ PushButtonMorph, SyntaxElementMorph, Color, Point, WatcherMorph,
|
||||||
StringMorph, SpriteMorph, ScrollFrameMorph, CellMorph, ArrowMorph,
|
StringMorph, SpriteMorph, ScrollFrameMorph, CellMorph, ArrowMorph,
|
||||||
MenuMorph, snapEquals, Morph, isNil, localize, MorphicPreferences*/
|
MenuMorph, snapEquals, Morph, isNil, localize, MorphicPreferences*/
|
||||||
|
|
||||||
modules.lists = '2014-July-28';
|
modules.lists = '2014-November-20';
|
||||||
|
|
||||||
var List;
|
var List;
|
||||||
var ListWatcherMorph;
|
var ListWatcherMorph;
|
||||||
|
@ -125,6 +125,9 @@ List.prototype.changed = function () {
|
||||||
|
|
||||||
List.prototype.cons = function (car, cdr) {
|
List.prototype.cons = function (car, cdr) {
|
||||||
var answer = new List();
|
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.first = isNil(car) ? null : car;
|
||||||
answer.rest = cdr || null;
|
answer.rest = cdr || null;
|
||||||
answer.isLinked = true;
|
answer.isLinked = true;
|
||||||
|
|
Ładowanie…
Reference in New Issue