Skip to content

Instantly share code, notes, and snippets.

@garyb
Created August 18, 2018 11:21
Show Gist options
  • Save garyb/af8a44542209fd147ae95ccb70056956 to your computer and use it in GitHub Desktop.
Save garyb/af8a44542209fd147ae95ccb70056956 to your computer and use it in GitHub Desktop.
// Generated by purs bundle 0.12.0
var PS = {};
(function(exports) {
"use strict";
var replicate = function (count) {
return function (value) {
if (count < 1) {
return [];
}
var result = new Array(count);
return result.fill(value);
};
};
var replicatePolyfill = function (count) {
return function (value) {
var result = [];
var n = 0;
for (var i = 0; i < count; i++) {
result[n++] = value;
}
return result;
};
};
// In browsers that have Array.prototype.fill we use it, as it's faster.
exports.replicate = typeof Array.prototype.fill === "function" ? replicate : replicatePolyfill;
})(PS["Data.Array"] = PS["Data.Array"] || {});
(function(exports) {
"use strict";
exports.refEq = function (r1) {
return function (r2) {
return r1 === r2;
};
};
exports.eqArrayImpl = function (f) {
return function (xs) {
return function (ys) {
if (xs === ys) return true;
if (xs.length !== ys.length) return false;
for (var i = 0; i < xs.length; i++) {
if (!f(xs[i])(ys[i])) return false;
}
return true;
};
};
};
})(PS["Data.Eq"] = PS["Data.Eq"] || {});
(function(exports) {
// Generated by purs version 0.12.0
"use strict";
var $foreign = PS["Data.Eq"];
var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];
var Data_Symbol = PS["Data.Symbol"];
var Data_Unit = PS["Data.Unit"];
var Data_Void = PS["Data.Void"];
var Record_Unsafe = PS["Record.Unsafe"];
var Type_Data_RowList = PS["Type.Data.RowList"];
var Eq = function (eq) {
this.eq = eq;
};
var eqString = new Eq($foreign.refEq);
var eqBoolean = new Eq($foreign.refEq);
var eq = function (dict) {
return dict.eq;
};
var eqArray = function (dictEq) {
return new Eq($foreign.eqArrayImpl(eq(dictEq)));
};
exports["Eq"] = Eq;
exports["eq"] = eq;
exports["eqBoolean"] = eqBoolean;
exports["eqString"] = eqString;
exports["eqArray"] = eqArray;
})(PS["Data.Eq"] = PS["Data.Eq"] || {});
(function(exports) {
// Generated by purs version 0.12.0
"use strict";
var $foreign = PS["Data.Array"];
var Control_Alt = PS["Control.Alt"];
var Control_Alternative = PS["Control.Alternative"];
var Control_Applicative = PS["Control.Applicative"];
var Control_Apply = PS["Control.Apply"];
var Control_Bind = PS["Control.Bind"];
var Control_Category = PS["Control.Category"];
var Control_Lazy = PS["Control.Lazy"];
var Control_Monad_Rec_Class = PS["Control.Monad.Rec.Class"];
var Control_Monad_ST = PS["Control.Monad.ST"];
var Control_Monad_ST_Internal = PS["Control.Monad.ST.Internal"];
var Control_Semigroupoid = PS["Control.Semigroupoid"];
var Data_Array_NonEmpty_Internal = PS["Data.Array.NonEmpty.Internal"];
var Data_Array_ST = PS["Data.Array.ST"];
var Data_Array_ST_Iterator = PS["Data.Array.ST.Iterator"];
var Data_Boolean = PS["Data.Boolean"];
var Data_Eq = PS["Data.Eq"];
var Data_Foldable = PS["Data.Foldable"];
var Data_Function = PS["Data.Function"];
var Data_Functor = PS["Data.Functor"];
var Data_HeytingAlgebra = PS["Data.HeytingAlgebra"];
var Data_Maybe = PS["Data.Maybe"];
var Data_Ord = PS["Data.Ord"];
var Data_Ordering = PS["Data.Ordering"];
var Data_Ring = PS["Data.Ring"];
var Data_Semigroup = PS["Data.Semigroup"];
var Data_Semiring = PS["Data.Semiring"];
var Data_Traversable = PS["Data.Traversable"];
var Data_Tuple = PS["Data.Tuple"];
var Data_Unfoldable = PS["Data.Unfoldable"];
var Partial_Unsafe = PS["Partial.Unsafe"];
var Prelude = PS["Prelude"];
var Unsafe_Coerce = PS["Unsafe.Coerce"];
exports["replicate"] = $foreign.replicate;
})(PS["Data.Array"] = PS["Data.Array"] || {});
(function(exports) {
// Generated by purs version 0.12.0
"use strict";
var $foreign = PS["Data.Show"];
var Data_Symbol = PS["Data.Symbol"];
var Record_Unsafe = PS["Record.Unsafe"];
var Type_Data_RowList = PS["Type.Data.RowList"];
var Show = function (show) {
this.show = show;
};
var showBoolean = new Show(function (v) {
if (v) {
return "true";
};
if (!v) {
return "false";
};
throw new Error("Failed pattern match at Data.Show line 20, column 1 - line 20, column 37: " + [ v.constructor.name ]);
});
var show = function (dict) {
return dict.show;
};
exports["Show"] = Show;
exports["show"] = show;
exports["showBoolean"] = showBoolean;
})(PS["Data.Show"] = PS["Data.Show"] || {});
(function(exports) {
"use strict";
exports.log = function (s) {
return function () {
console.log(s);
return {};
};
};
})(PS["Effect.Console"] = PS["Effect.Console"] || {});
(function(exports) {
// Generated by purs version 0.12.0
"use strict";
var $foreign = PS["Effect.Console"];
var Data_Show = PS["Data.Show"];
var Data_Unit = PS["Data.Unit"];
var Effect = PS["Effect"];
exports["log"] = $foreign.log;
})(PS["Effect.Console"] = PS["Effect.Console"] || {});
(function(exports) {
"use strict";
var Control_Bind = PS["Control.Bind"];
var Data_Array = PS["Data.Array"];
var Data_Eq = PS["Data.Eq"];
var Data_Function = PS["Data.Function"];
var Data_Ring = PS["Data.Ring"];
var Data_Show = PS["Data.Show"];
var Effect = PS["Effect"];
var Effect_Console = PS["Effect.Console"];
var Prelude = PS["Prelude"];
var main = function __do() {
Effect_Console.log("replicate should produce an array containg an item a specified number of times")();
Effect_Console.log(Data_Show.show(Data_Show.showBoolean)(Data_Eq.eq(Data_Eq.eqArray(Data_Eq.eqBoolean))(Data_Array.replicate(3)(true))([ true, true, true ])))();
Effect_Console.log(Data_Show.show(Data_Show.showBoolean)(Data_Eq.eq(Data_Eq.eqArray(Data_Eq.eqString))(Data_Array.replicate(1)("foo"))([ "foo" ])))();
Effect_Console.log(Data_Show.show(Data_Show.showBoolean)(Data_Eq.eq(Data_Eq.eqArray(Data_Eq.eqString))(Data_Array.replicate(0)("foo"))([ ])))();
return Effect_Console.log(Data_Show.show(Data_Show.showBoolean)(Data_Eq.eq(Data_Eq.eqArray(Data_Eq.eqString))(Data_Array.replicate(-1 | 0)("foo"))([ ])))();
};
exports["main"] = main;
})(PS["Main"] = PS["Main"] || {});
PS["Main"].main();
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment