feat: add recent blocks
This commit is contained in:
parent
bb65f3693c
commit
1355d040aa
GPG key ID:
65122AD495A7F5B2
4 changed files with 343 additions and 181 deletions
|
|
@ -5,6 +5,10 @@ All notable changes to this project will be documented in this file.
|
||||||
The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/),
|
The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/),
|
||||||
and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0.html).
|
and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0.html).
|
||||||
|
|
||||||
|
## [0.3.1.0]
|
||||||
|
|
||||||
|
- Display recent blocks in home page
|
||||||
|
|
||||||
## [0.3.0.0]
|
## [0.3.0.0]
|
||||||
|
|
||||||
### Added
|
### Added
|
||||||
|
|
|
||||||
345
dev/app.js
345
dev/app.js
|
|
@ -159,19 +159,19 @@
|
||||||
};
|
};
|
||||||
var applyFirst = function(dictApply) {
|
var applyFirst = function(dictApply) {
|
||||||
var apply12 = apply(dictApply);
|
var apply12 = apply(dictApply);
|
||||||
var map44 = map(dictApply.Functor0());
|
var map45 = map(dictApply.Functor0());
|
||||||
return function(a2) {
|
return function(a2) {
|
||||||
return function(b2) {
|
return function(b2) {
|
||||||
return apply12(map44($$const)(a2))(b2);
|
return apply12(map45($$const)(a2))(b2);
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
var applySecond = function(dictApply) {
|
var applySecond = function(dictApply) {
|
||||||
var apply12 = apply(dictApply);
|
var apply12 = apply(dictApply);
|
||||||
var map44 = map(dictApply.Functor0());
|
var map45 = map(dictApply.Functor0());
|
||||||
return function(a2) {
|
return function(a2) {
|
||||||
return function(b2) {
|
return function(b2) {
|
||||||
return apply12(map44($$const(identity2))(a2))(b2);
|
return apply12(map45($$const(identity2))(a2))(b2);
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
@ -411,11 +411,11 @@
|
||||||
|
|
||||||
// output/Data.Ord/foreign.js
|
// output/Data.Ord/foreign.js
|
||||||
var unsafeCompareImpl = function(lt) {
|
var unsafeCompareImpl = function(lt) {
|
||||||
return function(eq4) {
|
return function(eq5) {
|
||||||
return function(gt) {
|
return function(gt) {
|
||||||
return function(x) {
|
return function(x) {
|
||||||
return function(y) {
|
return function(y) {
|
||||||
return x < y ? lt : x === y ? eq4 : gt;
|
return x < y ? lt : x === y ? eq5 : gt;
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
@ -796,7 +796,7 @@
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
var eqMaybe = function(dictEq) {
|
var eqMaybe = function(dictEq) {
|
||||||
var eq4 = eq(dictEq);
|
var eq5 = eq(dictEq);
|
||||||
return {
|
return {
|
||||||
eq: function(x) {
|
eq: function(x) {
|
||||||
return function(y) {
|
return function(y) {
|
||||||
|
|
@ -805,7 +805,7 @@
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
if (x instanceof Just && y instanceof Just) {
|
if (x instanceof Just && y instanceof Just) {
|
||||||
return eq4(x.value0)(y.value0);
|
return eq5(x.value0)(y.value0);
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
return false;
|
return false;
|
||||||
|
|
@ -1138,13 +1138,13 @@
|
||||||
return v.value0;
|
return v.value0;
|
||||||
};
|
};
|
||||||
var eqTuple = function(dictEq) {
|
var eqTuple = function(dictEq) {
|
||||||
var eq4 = eq(dictEq);
|
var eq5 = eq(dictEq);
|
||||||
return function(dictEq1) {
|
return function(dictEq1) {
|
||||||
var eq12 = eq(dictEq1);
|
var eq12 = eq(dictEq1);
|
||||||
return {
|
return {
|
||||||
eq: function(x) {
|
eq: function(x) {
|
||||||
return function(y) {
|
return function(y) {
|
||||||
return eq4(x.value0)(y.value0) && eq12(x.value1)(y.value1);
|
return eq5(x.value0)(y.value0) && eq12(x.value1)(y.value1);
|
||||||
};
|
};
|
||||||
}
|
}
|
||||||
};
|
};
|
||||||
|
|
@ -1337,7 +1337,7 @@
|
||||||
var intercalate = function(dictFoldable) {
|
var intercalate = function(dictFoldable) {
|
||||||
var foldl22 = foldl(dictFoldable);
|
var foldl22 = foldl(dictFoldable);
|
||||||
return function(dictMonoid) {
|
return function(dictMonoid) {
|
||||||
var append9 = append(dictMonoid.Semigroup0());
|
var append10 = append(dictMonoid.Semigroup0());
|
||||||
var mempty3 = mempty(dictMonoid);
|
var mempty3 = mempty(dictMonoid);
|
||||||
return function(sep) {
|
return function(sep) {
|
||||||
return function(xs) {
|
return function(xs) {
|
||||||
|
|
@ -1352,7 +1352,7 @@
|
||||||
;
|
;
|
||||||
return {
|
return {
|
||||||
init: false,
|
init: false,
|
||||||
acc: append9(v.acc)(append9(sep)(v1))
|
acc: append10(v.acc)(append10(sep)(v1))
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
@ -1463,12 +1463,12 @@
|
||||||
var foldMapDefaultR = function(dictFoldable) {
|
var foldMapDefaultR = function(dictFoldable) {
|
||||||
var foldr22 = foldr(dictFoldable);
|
var foldr22 = foldr(dictFoldable);
|
||||||
return function(dictMonoid) {
|
return function(dictMonoid) {
|
||||||
var append9 = append(dictMonoid.Semigroup0());
|
var append10 = append(dictMonoid.Semigroup0());
|
||||||
var mempty3 = mempty(dictMonoid);
|
var mempty3 = mempty(dictMonoid);
|
||||||
return function(f) {
|
return function(f) {
|
||||||
return foldr22(function(x) {
|
return foldr22(function(x) {
|
||||||
return function(acc) {
|
return function(acc) {
|
||||||
return append9(f(x))(acc);
|
return append10(f(x))(acc);
|
||||||
};
|
};
|
||||||
})(mempty3);
|
})(mempty3);
|
||||||
};
|
};
|
||||||
|
|
@ -2536,10 +2536,10 @@
|
||||||
var $$try2 = function(dictMonadError) {
|
var $$try2 = function(dictMonadError) {
|
||||||
var catchError1 = catchError(dictMonadError);
|
var catchError1 = catchError(dictMonadError);
|
||||||
var Monad0 = dictMonadError.MonadThrow0().Monad0();
|
var Monad0 = dictMonadError.MonadThrow0().Monad0();
|
||||||
var map44 = map(Monad0.Bind1().Apply0().Functor0());
|
var map45 = map(Monad0.Bind1().Apply0().Functor0());
|
||||||
var pure23 = pure(Monad0.Applicative0());
|
var pure23 = pure(Monad0.Applicative0());
|
||||||
return function(a2) {
|
return function(a2) {
|
||||||
return catchError1(map44(Right.create)(a2))(function($52) {
|
return catchError1(map45(Right.create)(a2))(function($52) {
|
||||||
return pure23(Left.create($52));
|
return pure23(Left.create($52));
|
||||||
});
|
});
|
||||||
};
|
};
|
||||||
|
|
@ -2912,7 +2912,7 @@
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
var altExceptT = function(dictSemigroup) {
|
var altExceptT = function(dictSemigroup) {
|
||||||
var append9 = append(dictSemigroup);
|
var append10 = append(dictSemigroup);
|
||||||
return function(dictMonad) {
|
return function(dictMonad) {
|
||||||
var Bind1 = dictMonad.Bind1();
|
var Bind1 = dictMonad.Bind1();
|
||||||
var bind19 = bind(Bind1);
|
var bind19 = bind(Bind1);
|
||||||
|
|
@ -2933,7 +2933,7 @@
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
if (rn instanceof Left) {
|
if (rn instanceof Left) {
|
||||||
return pure23(new Left(append9(rm.value0)(rn.value0)));
|
return pure23(new Left(append10(rm.value0)(rn.value0)));
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
throw new Error("Failed pattern match at Control.Monad.Except.Trans (line 86, column 9 - line 88, column 49): " + [rn.constructor.name]);
|
throw new Error("Failed pattern match at Control.Monad.Except.Trans (line 86, column 9 - line 88, column 49): " + [rn.constructor.name]);
|
||||||
|
|
@ -3106,7 +3106,7 @@
|
||||||
};
|
};
|
||||||
}
|
}
|
||||||
return function(apply6) {
|
return function(apply6) {
|
||||||
return function(map44) {
|
return function(map45) {
|
||||||
return function(pure23) {
|
return function(pure23) {
|
||||||
return function(f) {
|
return function(f) {
|
||||||
return function(array) {
|
return function(array) {
|
||||||
|
|
@ -3115,14 +3115,14 @@
|
||||||
case 0:
|
case 0:
|
||||||
return pure23([]);
|
return pure23([]);
|
||||||
case 1:
|
case 1:
|
||||||
return map44(array1)(f(array[bot]));
|
return map45(array1)(f(array[bot]));
|
||||||
case 2:
|
case 2:
|
||||||
return apply6(map44(array2)(f(array[bot])))(f(array[bot + 1]));
|
return apply6(map45(array2)(f(array[bot])))(f(array[bot + 1]));
|
||||||
case 3:
|
case 3:
|
||||||
return apply6(apply6(map44(array3)(f(array[bot])))(f(array[bot + 1])))(f(array[bot + 2]));
|
return apply6(apply6(map45(array3)(f(array[bot])))(f(array[bot + 1])))(f(array[bot + 2]));
|
||||||
default:
|
default:
|
||||||
var pivot = bot + Math.floor((top3 - bot) / 4) * 2;
|
var pivot = bot + Math.floor((top3 - bot) / 4) * 2;
|
||||||
return apply6(map44(concat2)(go2(bot, pivot)))(go2(pivot, top3));
|
return apply6(map45(concat2)(go2(bot, pivot)))(go2(pivot, top3));
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
return go2(0, array.length);
|
return go2(0, array.length);
|
||||||
|
|
@ -3141,7 +3141,7 @@
|
||||||
var traversableMaybe = {
|
var traversableMaybe = {
|
||||||
traverse: function(dictApplicative) {
|
traverse: function(dictApplicative) {
|
||||||
var pure23 = pure(dictApplicative);
|
var pure23 = pure(dictApplicative);
|
||||||
var map44 = map(dictApplicative.Apply0().Functor0());
|
var map45 = map(dictApplicative.Apply0().Functor0());
|
||||||
return function(v) {
|
return function(v) {
|
||||||
return function(v1) {
|
return function(v1) {
|
||||||
if (v1 instanceof Nothing) {
|
if (v1 instanceof Nothing) {
|
||||||
|
|
@ -3149,7 +3149,7 @@
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
if (v1 instanceof Just) {
|
if (v1 instanceof Just) {
|
||||||
return map44(Just.create)(v(v1.value0));
|
return map45(Just.create)(v(v1.value0));
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
throw new Error("Failed pattern match at Data.Traversable (line 115, column 1 - line 119, column 33): " + [v.constructor.name, v1.constructor.name]);
|
throw new Error("Failed pattern match at Data.Traversable (line 115, column 1 - line 119, column 33): " + [v.constructor.name, v1.constructor.name]);
|
||||||
|
|
@ -3158,14 +3158,14 @@
|
||||||
},
|
},
|
||||||
sequence: function(dictApplicative) {
|
sequence: function(dictApplicative) {
|
||||||
var pure23 = pure(dictApplicative);
|
var pure23 = pure(dictApplicative);
|
||||||
var map44 = map(dictApplicative.Apply0().Functor0());
|
var map45 = map(dictApplicative.Apply0().Functor0());
|
||||||
return function(v) {
|
return function(v) {
|
||||||
if (v instanceof Nothing) {
|
if (v instanceof Nothing) {
|
||||||
return pure23(Nothing.value);
|
return pure23(Nothing.value);
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
if (v instanceof Just) {
|
if (v instanceof Just) {
|
||||||
return map44(Just.create)(v.value0);
|
return map45(Just.create)(v.value0);
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
throw new Error("Failed pattern match at Data.Traversable (line 115, column 1 - line 119, column 33): " + [v.constructor.name]);
|
throw new Error("Failed pattern match at Data.Traversable (line 115, column 1 - line 119, column 33): " + [v.constructor.name]);
|
||||||
|
|
@ -3986,13 +3986,13 @@
|
||||||
var foldMapWithIndexDefaultR = function(dictFoldableWithIndex) {
|
var foldMapWithIndexDefaultR = function(dictFoldableWithIndex) {
|
||||||
var foldrWithIndex1 = foldrWithIndex(dictFoldableWithIndex);
|
var foldrWithIndex1 = foldrWithIndex(dictFoldableWithIndex);
|
||||||
return function(dictMonoid) {
|
return function(dictMonoid) {
|
||||||
var append9 = append(dictMonoid.Semigroup0());
|
var append10 = append(dictMonoid.Semigroup0());
|
||||||
var mempty3 = mempty(dictMonoid);
|
var mempty3 = mempty(dictMonoid);
|
||||||
return function(f) {
|
return function(f) {
|
||||||
return foldrWithIndex1(function(i2) {
|
return foldrWithIndex1(function(i2) {
|
||||||
return function(x) {
|
return function(x) {
|
||||||
return function(acc) {
|
return function(acc) {
|
||||||
return append9(f(i2)(x))(acc);
|
return append10(f(i2)(x))(acc);
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
})(mempty3);
|
})(mempty3);
|
||||||
|
|
@ -4183,14 +4183,14 @@
|
||||||
traverseWithIndex: function(dictApplicative) {
|
traverseWithIndex: function(dictApplicative) {
|
||||||
var Apply0 = dictApplicative.Apply0();
|
var Apply0 = dictApplicative.Apply0();
|
||||||
var apply6 = apply(Apply0);
|
var apply6 = apply(Apply0);
|
||||||
var map44 = map(Apply0.Functor0());
|
var map45 = map(Apply0.Functor0());
|
||||||
var pure111 = pure(dictApplicative);
|
var pure111 = pure(dictApplicative);
|
||||||
return function(f) {
|
return function(f) {
|
||||||
return function(ms) {
|
return function(ms) {
|
||||||
return fold2(function(acc) {
|
return fold2(function(acc) {
|
||||||
return function(k) {
|
return function(k) {
|
||||||
return function(v) {
|
return function(v) {
|
||||||
return apply6(map44(flip(insert(k)))(acc))(f(k)(v));
|
return apply6(map45(flip(insert(k)))(acc))(f(k)(v));
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
})(pure111(empty2))(ms);
|
})(pure111(empty2))(ms);
|
||||||
|
|
@ -6944,7 +6944,7 @@
|
||||||
return unsafeReadTagged(dictMonad)("Number");
|
return unsafeReadTagged(dictMonad)("Number");
|
||||||
};
|
};
|
||||||
var readInt = function(dictMonad) {
|
var readInt = function(dictMonad) {
|
||||||
var map44 = map(dictMonad.Bind1().Apply0().Functor0());
|
var map45 = map(dictMonad.Bind1().Apply0().Functor0());
|
||||||
var readNumber1 = readNumber(dictMonad);
|
var readNumber1 = readNumber(dictMonad);
|
||||||
return function(value15) {
|
return function(value15) {
|
||||||
var error4 = new Left(singleton6(new TypeMismatch2("Int", tagOf(value15))));
|
var error4 = new Left(singleton6(new TypeMismatch2("Int", tagOf(value15))));
|
||||||
|
|
@ -6954,7 +6954,7 @@
|
||||||
return $155(fromNumber($156));
|
return $155(fromNumber($156));
|
||||||
};
|
};
|
||||||
}();
|
}();
|
||||||
return mapExceptT(map44(either($$const(error4))(fromNumber2)))(readNumber1(value15));
|
return mapExceptT(map45(either($$const(error4))(fromNumber2)))(readNumber1(value15));
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
var readString = function(dictMonad) {
|
var readString = function(dictMonad) {
|
||||||
|
|
@ -8445,11 +8445,11 @@
|
||||||
// output/Data.Bifoldable/index.js
|
// output/Data.Bifoldable/index.js
|
||||||
var bifoldableTuple = {
|
var bifoldableTuple = {
|
||||||
bifoldMap: function(dictMonoid) {
|
bifoldMap: function(dictMonoid) {
|
||||||
var append9 = append(dictMonoid.Semigroup0());
|
var append10 = append(dictMonoid.Semigroup0());
|
||||||
return function(f) {
|
return function(f) {
|
||||||
return function(g) {
|
return function(g) {
|
||||||
return function(v) {
|
return function(v) {
|
||||||
return append9(f(v.value0))(g(v.value1));
|
return append10(f(v.value0))(g(v.value1));
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
@ -8492,11 +8492,11 @@
|
||||||
bitraverse: function(dictApplicative) {
|
bitraverse: function(dictApplicative) {
|
||||||
var Apply0 = dictApplicative.Apply0();
|
var Apply0 = dictApplicative.Apply0();
|
||||||
var apply6 = apply(Apply0);
|
var apply6 = apply(Apply0);
|
||||||
var map44 = map(Apply0.Functor0());
|
var map45 = map(Apply0.Functor0());
|
||||||
return function(f) {
|
return function(f) {
|
||||||
return function(g) {
|
return function(g) {
|
||||||
return function(v) {
|
return function(v) {
|
||||||
return apply6(map44(Tuple.create)(f(v.value0)))(g(v.value1));
|
return apply6(map45(Tuple.create)(f(v.value0)))(g(v.value1));
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
@ -8504,9 +8504,9 @@
|
||||||
bisequence: function(dictApplicative) {
|
bisequence: function(dictApplicative) {
|
||||||
var Apply0 = dictApplicative.Apply0();
|
var Apply0 = dictApplicative.Apply0();
|
||||||
var apply6 = apply(Apply0);
|
var apply6 = apply(Apply0);
|
||||||
var map44 = map(Apply0.Functor0());
|
var map45 = map(Apply0.Functor0());
|
||||||
return function(v) {
|
return function(v) {
|
||||||
return apply6(map44(Tuple.create)(v.value0))(v.value1);
|
return apply6(map45(Tuple.create)(v.value0))(v.value1);
|
||||||
};
|
};
|
||||||
},
|
},
|
||||||
Bifunctor0: function() {
|
Bifunctor0: function() {
|
||||||
|
|
@ -9878,11 +9878,11 @@
|
||||||
return x;
|
return x;
|
||||||
};
|
};
|
||||||
var selectEq = function(dictEq) {
|
var selectEq = function(dictEq) {
|
||||||
var eq4 = eq(dictEq);
|
var eq5 = eq(dictEq);
|
||||||
return function($14) {
|
return function($14) {
|
||||||
return Selector(/* @__PURE__ */ function(v) {
|
return Selector(/* @__PURE__ */ function(v) {
|
||||||
return {
|
return {
|
||||||
eq: eq4,
|
eq: eq5,
|
||||||
select: v
|
select: v
|
||||||
};
|
};
|
||||||
}($14));
|
}($14));
|
||||||
|
|
@ -12651,7 +12651,7 @@
|
||||||
};
|
};
|
||||||
var runParserT$prime = function(dictMonadRec) {
|
var runParserT$prime = function(dictMonadRec) {
|
||||||
var Monad0 = dictMonadRec.Monad0();
|
var Monad0 = dictMonadRec.Monad0();
|
||||||
var map44 = map(Monad0.Bind1().Apply0().Functor0());
|
var map45 = map(Monad0.Bind1().Apply0().Functor0());
|
||||||
var pure111 = pure(Monad0.Applicative0());
|
var pure111 = pure(Monad0.Applicative0());
|
||||||
var tailRecM4 = tailRecM(dictMonadRec);
|
var tailRecM4 = tailRecM(dictMonadRec);
|
||||||
return function(state1) {
|
return function(state1) {
|
||||||
|
|
@ -12668,7 +12668,7 @@
|
||||||
;
|
;
|
||||||
if (v1 instanceof Lift3) {
|
if (v1 instanceof Lift3) {
|
||||||
$tco_done = true;
|
$tco_done = true;
|
||||||
return map44(Loop.create)(v1.value0);
|
return map45(Loop.create)(v1.value0);
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
if (v1 instanceof Stop) {
|
if (v1 instanceof Stop) {
|
||||||
|
|
@ -12710,12 +12710,12 @@
|
||||||
column: 1
|
column: 1
|
||||||
};
|
};
|
||||||
var runParserT = function(dictMonadRec) {
|
var runParserT = function(dictMonadRec) {
|
||||||
var map44 = map(dictMonadRec.Monad0().Bind1().Apply0().Functor0());
|
var map45 = map(dictMonadRec.Monad0().Bind1().Apply0().Functor0());
|
||||||
var runParserT$prime1 = runParserT$prime(dictMonadRec);
|
var runParserT$prime1 = runParserT$prime(dictMonadRec);
|
||||||
return function(s) {
|
return function(s) {
|
||||||
return function(p2) {
|
return function(p2) {
|
||||||
var initialState = new ParseState(s, initialPos, false);
|
var initialState = new ParseState(s, initialPos, false);
|
||||||
return map44(fst)(runParserT$prime1(initialState)(p2));
|
return map45(fst)(runParserT$prime1(initialState)(p2));
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
@ -12986,13 +12986,13 @@
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
var oneOfAs = function(dictFunctor) {
|
var oneOfAs = function(dictFunctor) {
|
||||||
var map44 = map(dictFunctor);
|
var map45 = map(dictFunctor);
|
||||||
return function(dictFoldable) {
|
return function(dictFoldable) {
|
||||||
var choice2 = choice(dictFoldable);
|
var choice2 = choice(dictFoldable);
|
||||||
return function(dictMonad) {
|
return function(dictMonad) {
|
||||||
return function(p2) {
|
return function(p2) {
|
||||||
return function(xs) {
|
return function(xs) {
|
||||||
return choice2(map44(function(v) {
|
return choice2(map45(function(v) {
|
||||||
return voidLeft3(p2(v.value0))(v.value1);
|
return voidLeft3(p2(v.value0))(v.value1);
|
||||||
})(xs));
|
})(xs));
|
||||||
};
|
};
|
||||||
|
|
@ -14036,10 +14036,10 @@
|
||||||
return function(dictApplicative) {
|
return function(dictApplicative) {
|
||||||
var Apply0 = dictApplicative.Apply0();
|
var Apply0 = dictApplicative.Apply0();
|
||||||
var apply6 = apply(Apply0);
|
var apply6 = apply(Apply0);
|
||||||
var map44 = map(Apply0.Functor0());
|
var map45 = map(Apply0.Functor0());
|
||||||
return function(fun) {
|
return function(fun) {
|
||||||
return function(a2) {
|
return function(a2) {
|
||||||
return apply6(map44(applyEither1)(runExceptT(fun)))(runExceptT(a2));
|
return apply6(map45(applyEither1)(runExceptT(fun)))(runExceptT(a2));
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
@ -14327,6 +14327,15 @@
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
||||||
|
// output/Affjax.StatusCode/index.js
|
||||||
|
var eqStatusCode = {
|
||||||
|
eq: function(x) {
|
||||||
|
return function(y) {
|
||||||
|
return x === y;
|
||||||
|
};
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
// output/Exblo.Home/index.js
|
// output/Exblo.Home/index.js
|
||||||
var forever2 = /* @__PURE__ */ forever(monadRecAff);
|
var forever2 = /* @__PURE__ */ forever(monadRecAff);
|
||||||
var discard4 = /* @__PURE__ */ discard(discardUnit);
|
var discard4 = /* @__PURE__ */ discard(discardUnit);
|
||||||
|
|
@ -14335,13 +14344,30 @@
|
||||||
var show7 = /* @__PURE__ */ show(showInt);
|
var show7 = /* @__PURE__ */ show(showInt);
|
||||||
var value14 = /* @__PURE__ */ value(isPropString);
|
var value14 = /* @__PURE__ */ value(isPropString);
|
||||||
var type_19 = /* @__PURE__ */ type_(isPropButtonType);
|
var type_19 = /* @__PURE__ */ type_(isPropButtonType);
|
||||||
var show17 = /* @__PURE__ */ show(showZcashNet);
|
var show17 = /* @__PURE__ */ show(showString);
|
||||||
|
var append9 = /* @__PURE__ */ append(semigroupArray);
|
||||||
|
var map38 = /* @__PURE__ */ map(functorArray);
|
||||||
|
var show23 = /* @__PURE__ */ show(showZcashNet);
|
||||||
var bind9 = /* @__PURE__ */ bind(bindHalogenM);
|
var bind9 = /* @__PURE__ */ bind(bindHalogenM);
|
||||||
var bindFlipped8 = /* @__PURE__ */ bindFlipped(bindHalogenM);
|
var bindFlipped8 = /* @__PURE__ */ bindFlipped(bindHalogenM);
|
||||||
var discard22 = /* @__PURE__ */ discard4(bindHalogenM);
|
var discard22 = /* @__PURE__ */ discard4(bindHalogenM);
|
||||||
var modify_5 = /* @__PURE__ */ modify_2(monadStateHalogenM);
|
var modify_5 = /* @__PURE__ */ modify_2(monadStateHalogenM);
|
||||||
var readJSON3 = /* @__PURE__ */ readJSON(readInt2);
|
var readJSON3 = /* @__PURE__ */ readJSON(readInt2);
|
||||||
var show23 = /* @__PURE__ */ show(/* @__PURE__ */ showNonEmptyList(showForeignError));
|
var show32 = /* @__PURE__ */ show(/* @__PURE__ */ showNonEmptyList(showForeignError));
|
||||||
|
var eq4 = /* @__PURE__ */ eq(eqStatusCode);
|
||||||
|
var readJSON1 = /* @__PURE__ */ readJSON(/* @__PURE__ */ readArray2(/* @__PURE__ */ readRecord()(/* @__PURE__ */ readFieldsCons({
|
||||||
|
reflectSymbol: function() {
|
||||||
|
return "hash";
|
||||||
|
}
|
||||||
|
})(readString3)(/* @__PURE__ */ readFieldsCons({
|
||||||
|
reflectSymbol: function() {
|
||||||
|
return "height";
|
||||||
|
}
|
||||||
|
})(readInt2)(/* @__PURE__ */ readFieldsCons({
|
||||||
|
reflectSymbol: function() {
|
||||||
|
return "time";
|
||||||
|
}
|
||||||
|
})(readInt2)(readFieldsNil)()())()())()())));
|
||||||
var gets4 = /* @__PURE__ */ gets(monadStateHalogenM);
|
var gets4 = /* @__PURE__ */ gets(monadStateHalogenM);
|
||||||
var Initialize4 = /* @__PURE__ */ function() {
|
var Initialize4 = /* @__PURE__ */ function() {
|
||||||
function Initialize7() {
|
function Initialize7() {
|
||||||
|
|
@ -14422,12 +14448,32 @@
|
||||||
return show7(state3.block.value0);
|
return show7(state3.block.value0);
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
throw new Error("Failed pattern match at Exblo.Home (line 68, column 17 - line 72, column 38): " + [state3.block.constructor.name]);
|
throw new Error("Failed pattern match at Exblo.Home (line 70, column 17 - line 74, column 38): " + [state3.block.constructor.name]);
|
||||||
}())])]), form([onSubmit(function(ev) {
|
}())])]), form([onSubmit(function(ev) {
|
||||||
return new Search(ev);
|
return new Search(ev);
|
||||||
})])([p_([input([css("input"), value14(state3.term), placeholder("TX ID/Block height..."), onValueInput(function(str) {
|
})])([p_([input([css("input"), value14(state3.term), placeholder("TX ID/Block height..."), onValueInput(function(str) {
|
||||||
return new SetTerm(str);
|
return new SetTerm(str);
|
||||||
})]), button([css("btn-primary raised"), type_19(ButtonSubmit.value)])([i([css("ri-search-line ri-xl")])([])])])]), table([css("footer")])([tr_([td([css("footer")])([p_([text("Made with "), a([href("https://www.purescript.org/")])([text("PureScript")])])]), td([css("footer")])([p_([i([css("ri-copyright-line")])([]), text("2024 Vergara Technologies LLC")])]), td([css("footer")])([p([])([text("Network: "), text(show17(state3.network)), br_, text("Server: "), text(state3.version), br_, text("UI: 0.3.0.0"), br_, text("Zebra Node: "), text(state3.zebra)])])])])]);
|
})]), button([css("btn-primary raised"), type_19(ButtonSubmit.value)])([i([css("ri-search-line ri-xl")])([])])])]), function() {
|
||||||
|
if (state3.recents instanceof NotAsked) {
|
||||||
|
return div_([]);
|
||||||
|
}
|
||||||
|
;
|
||||||
|
if (state3.recents instanceof Loading2) {
|
||||||
|
return div3([css("card")])([text("Processing data...")]);
|
||||||
|
}
|
||||||
|
;
|
||||||
|
if (state3.recents instanceof Failure) {
|
||||||
|
return div3([css("card")])([text(show17(state3.recents.value0))]);
|
||||||
|
}
|
||||||
|
;
|
||||||
|
if (state3.recents instanceof Success2) {
|
||||||
|
return div3([css("card")])([h3_([text("recent blocks")]), table_(append9([tr_([th_([text("mined")]), th_([text("hash")])])])(map38(function(b2) {
|
||||||
|
return tr_([td_([text(convertToDate(b2.time))]), td_([a([safeHref(new Blk(show7(b2.height)))])([text(b2.hash)])])]);
|
||||||
|
})(state3.recents.value0)))]);
|
||||||
|
}
|
||||||
|
;
|
||||||
|
throw new Error("Failed pattern match at Exblo.Home (line 93, column 7 - line 121, column 14): " + [state3.recents.constructor.name]);
|
||||||
|
}(), table([css("footer")])([tr_([td([css("footer")])([p_([text("Made with "), a([href("https://www.purescript.org/")])([text("PureScript")])])]), td([css("footer")])([p_([i([css("ri-copyright-line")])([]), text("2024 Vergara Technologies LLC")])]), td([css("footer")])([p([])([text("Network: "), text(show23(state3.network)), br_, text("Server: "), text(state3.version), br_, text("UI: 0.3.0.0"), br_, text("Zebra Node: "), text(state3.zebra)])])])])]);
|
||||||
};
|
};
|
||||||
var handleAction2 = function(dictMonadAff) {
|
var handleAction2 = function(dictMonadAff) {
|
||||||
var monadAffHalogenM2 = monadAffHalogenM(dictMonadAff);
|
var monadAffHalogenM2 = monadAffHalogenM(dictMonadAff);
|
||||||
|
|
@ -14445,18 +14491,18 @@
|
||||||
return bind9(bindFlipped8(subscribe2)(timer1(Refresh.value)))(function() {
|
return bind9(bindFlipped8(subscribe2)(timer1(Refresh.value)))(function() {
|
||||||
return bind9(getStore2)(function(st) {
|
return bind9(getStore2)(function(st) {
|
||||||
return discard22(modify_5(function(v1) {
|
return discard22(modify_5(function(v1) {
|
||||||
var $70 = {};
|
var $103 = {};
|
||||||
for (var $71 in v1) {
|
for (var $104 in v1) {
|
||||||
if ({}.hasOwnProperty.call(v1, $71)) {
|
if ({}.hasOwnProperty.call(v1, $104)) {
|
||||||
$70[$71] = v1[$71];
|
$103[$104] = v1[$104];
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
$70.network = st.network;
|
$103.network = st.network;
|
||||||
$70.zebra = st.zebraVersion;
|
$103.zebra = st.zebraVersion;
|
||||||
$70.version = st.version;
|
$103.version = st.version;
|
||||||
return $70;
|
return $103;
|
||||||
}))(function() {
|
}))(function() {
|
||||||
return handleAction2(dictMonadAff)(dictNavigate)(dictMonadStore)(Refresh.value);
|
return handleAction2(dictMonadAff)(dictNavigate)(dictMonadStore)(Refresh.value);
|
||||||
});
|
});
|
||||||
|
|
@ -14466,18 +14512,21 @@
|
||||||
;
|
;
|
||||||
if (v instanceof Refresh) {
|
if (v instanceof Refresh) {
|
||||||
return discard22(modify_5(function(v1) {
|
return discard22(modify_5(function(v1) {
|
||||||
var $73 = {};
|
var $106 = {};
|
||||||
for (var $74 in v1) {
|
for (var $107 in v1) {
|
||||||
if ({}.hasOwnProperty.call(v1, $74)) {
|
if ({}.hasOwnProperty.call(v1, $107)) {
|
||||||
$73[$74] = v1[$74];
|
$106[$107] = v1[$107];
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
$73.block = Loading2.value;
|
$106.block = Loading2.value;
|
||||||
return $73;
|
$106.recents = Loading2.value;
|
||||||
|
return $106;
|
||||||
}))(function() {
|
}))(function() {
|
||||||
return bind9(liftAff2(get4(string)("https://api.exblo.app/getblock")))(function(res) {
|
return bind9(liftAff2(get4(string)("https://api.exblo.app/getblock")))(function(res) {
|
||||||
|
return bind9(liftAff2(get4(string)("https://api.exblo.app/getrecentblocks")))(function(resList) {
|
||||||
|
return discard22(function() {
|
||||||
if (res instanceof Left) {
|
if (res instanceof Left) {
|
||||||
return log4("/block response failed to decode: " + printError(res.value0));
|
return log4("/block response failed to decode: " + printError(res.value0));
|
||||||
}
|
}
|
||||||
|
|
@ -14486,73 +14535,134 @@
|
||||||
var v1 = readJSON3(res.value0.body);
|
var v1 = readJSON3(res.value0.body);
|
||||||
if (v1 instanceof Right) {
|
if (v1 instanceof Right) {
|
||||||
return modify_5(function(v2) {
|
return modify_5(function(v2) {
|
||||||
var $79 = {};
|
var $112 = {};
|
||||||
for (var $80 in v2) {
|
for (var $113 in v2) {
|
||||||
if ({}.hasOwnProperty.call(v2, $80)) {
|
if ({}.hasOwnProperty.call(v2, $113)) {
|
||||||
$79[$80] = v2[$80];
|
$112[$113] = v2[$113];
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
$79.block = new Success2(v1.value0);
|
$112.block = new Success2(v1.value0);
|
||||||
return $79;
|
return $112;
|
||||||
});
|
});
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
if (v1 instanceof Left) {
|
if (v1 instanceof Left) {
|
||||||
return discard22(log4("Can't parse JSON. " + show23(v1.value0)))(function() {
|
return discard22(log4("Can't parse JSON. " + show32(v1.value0)))(function() {
|
||||||
return modify_5(function(v2) {
|
return modify_5(function(v2) {
|
||||||
var $83 = {};
|
var $116 = {};
|
||||||
for (var $84 in v2) {
|
for (var $117 in v2) {
|
||||||
if ({}.hasOwnProperty.call(v2, $84)) {
|
if ({}.hasOwnProperty.call(v2, $117)) {
|
||||||
$83[$84] = v2[$84];
|
$116[$117] = v2[$117];
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
$83.block = new Failure("Failed to parse response");
|
$116.block = new Failure("Failed to parse response");
|
||||||
return $83;
|
return $116;
|
||||||
});
|
});
|
||||||
});
|
});
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
throw new Error("Failed pattern match at Exblo.Home (line 144, column 9 - line 152, column 61): " + [v1.constructor.name]);
|
throw new Error("Failed pattern match at Exblo.Home (line 176, column 9 - line 184, column 61): " + [v1.constructor.name]);
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
throw new Error("Failed pattern match at Exblo.Home (line 140, column 5 - line 152, column 61): " + [res.constructor.name]);
|
throw new Error("Failed pattern match at Exblo.Home (line 172, column 5 - line 184, column 61): " + [res.constructor.name]);
|
||||||
|
}())(function() {
|
||||||
|
if (resList instanceof Left) {
|
||||||
|
return log4("/getrecentblocks response failed to decode: " + printError(resList.value0));
|
||||||
|
}
|
||||||
|
;
|
||||||
|
if (resList instanceof Right) {
|
||||||
|
var $123 = eq4(resList.value0.status)(200);
|
||||||
|
if ($123) {
|
||||||
|
var v1 = readJSON1(resList.value0.body);
|
||||||
|
if (v1 instanceof Right) {
|
||||||
|
return modify_5(function(v2) {
|
||||||
|
var $125 = {};
|
||||||
|
for (var $126 in v2) {
|
||||||
|
if ({}.hasOwnProperty.call(v2, $126)) {
|
||||||
|
$125[$126] = v2[$126];
|
||||||
|
}
|
||||||
|
;
|
||||||
|
}
|
||||||
|
;
|
||||||
|
$125.recents = new Success2(v1.value0);
|
||||||
|
return $125;
|
||||||
|
});
|
||||||
|
}
|
||||||
|
;
|
||||||
|
if (v1 instanceof Left) {
|
||||||
|
return discard22(log4("Can't parse JSON. " + show32(v1.value0)))(function() {
|
||||||
|
return modify_5(function(v2) {
|
||||||
|
var $129 = {};
|
||||||
|
for (var $130 in v2) {
|
||||||
|
if ({}.hasOwnProperty.call(v2, $130)) {
|
||||||
|
$129[$130] = v2[$130];
|
||||||
|
}
|
||||||
|
;
|
||||||
|
}
|
||||||
|
;
|
||||||
|
$129.recents = new Failure("Failed to parse response");
|
||||||
|
return $129;
|
||||||
|
});
|
||||||
|
});
|
||||||
|
}
|
||||||
|
;
|
||||||
|
throw new Error("Failed pattern match at Exblo.Home (line 189, column 55 - line 194, column 73): " + [v1.constructor.name]);
|
||||||
|
}
|
||||||
|
;
|
||||||
|
return modify_5(function(v12) {
|
||||||
|
var $133 = {};
|
||||||
|
for (var $134 in v12) {
|
||||||
|
if ({}.hasOwnProperty.call(v12, $134)) {
|
||||||
|
$133[$134] = v12[$134];
|
||||||
|
}
|
||||||
|
;
|
||||||
|
}
|
||||||
|
;
|
||||||
|
$133.recents = new Failure("Error in API server");
|
||||||
|
return $133;
|
||||||
|
});
|
||||||
|
}
|
||||||
|
;
|
||||||
|
throw new Error("Failed pattern match at Exblo.Home (line 185, column 5 - line 195, column 69): " + [resList.constructor.name]);
|
||||||
|
});
|
||||||
|
});
|
||||||
});
|
});
|
||||||
});
|
});
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
if (v instanceof SetTerm) {
|
if (v instanceof SetTerm) {
|
||||||
return modify_5(function(v1) {
|
return modify_5(function(v1) {
|
||||||
var $88 = {};
|
var $137 = {};
|
||||||
for (var $89 in v1) {
|
for (var $138 in v1) {
|
||||||
if ({}.hasOwnProperty.call(v1, $89)) {
|
if ({}.hasOwnProperty.call(v1, $138)) {
|
||||||
$88[$89] = v1[$89];
|
$137[$138] = v1[$138];
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
$88.term = v.value0;
|
$137.term = v.value0;
|
||||||
return $88;
|
return $137;
|
||||||
});
|
});
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
if (v instanceof Receive4) {
|
if (v instanceof Receive4) {
|
||||||
return modify_5(function(v1) {
|
return modify_5(function(v1) {
|
||||||
var $92 = {};
|
var $141 = {};
|
||||||
for (var $93 in v1) {
|
for (var $142 in v1) {
|
||||||
if ({}.hasOwnProperty.call(v1, $93)) {
|
if ({}.hasOwnProperty.call(v1, $142)) {
|
||||||
$92[$93] = v1[$93];
|
$141[$142] = v1[$142];
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
$92.network = v.value0.context.network;
|
$141.network = v.value0.context.network;
|
||||||
$92.zebra = v.value0.context.zebraVersion;
|
$141.zebra = v.value0.context.zebraVersion;
|
||||||
$92.version = v.value0.context.version;
|
$141.version = v.value0.context.version;
|
||||||
return $92;
|
return $141;
|
||||||
});
|
});
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
|
|
@ -14561,8 +14671,8 @@
|
||||||
return bind9(gets4(function(v1) {
|
return bind9(gets4(function(v1) {
|
||||||
return v1.term;
|
return v1.term;
|
||||||
}))(function(term) {
|
}))(function(term) {
|
||||||
var $98 = length3(term) !== 64;
|
var $147 = length3(term) !== 64;
|
||||||
if ($98) {
|
if ($147) {
|
||||||
return navigate2(new Blk(term));
|
return navigate2(new Blk(term));
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
|
|
@ -14571,7 +14681,7 @@
|
||||||
});
|
});
|
||||||
}
|
}
|
||||||
;
|
;
|
||||||
throw new Error("Failed pattern match at Exblo.Home (line 131, column 16 - line 162, column 30): " + [v.constructor.name]);
|
throw new Error("Failed pattern match at Exblo.Home (line 162, column 16 - line 204, column 28): " + [v.constructor.name]);
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
@ -14589,7 +14699,8 @@
|
||||||
term: "",
|
term: "",
|
||||||
network: TestNet.value,
|
network: TestNet.value,
|
||||||
zebra: "",
|
zebra: "",
|
||||||
version: ""
|
version: "",
|
||||||
|
recents: NotAsked.value
|
||||||
};
|
};
|
||||||
},
|
},
|
||||||
render: render2,
|
render: render2,
|
||||||
|
|
@ -14597,8 +14708,8 @@
|
||||||
handleQuery: defaultEval.handleQuery,
|
handleQuery: defaultEval.handleQuery,
|
||||||
finalize: defaultEval.finalize,
|
finalize: defaultEval.finalize,
|
||||||
handleAction: handleAction1(dictNavigate)(dictMonadStore),
|
handleAction: handleAction1(dictNavigate)(dictMonadStore),
|
||||||
receive: function($100) {
|
receive: function($149) {
|
||||||
return Just.create(Receive4.create($100));
|
return Just.create(Receive4.create($149));
|
||||||
},
|
},
|
||||||
initialize: new Just(Initialize4.value)
|
initialize: new Just(Initialize4.value)
|
||||||
})
|
})
|
||||||
|
|
@ -15048,7 +15159,7 @@
|
||||||
var bindFlipped9 = /* @__PURE__ */ bindFlipped(bindEither);
|
var bindFlipped9 = /* @__PURE__ */ bindFlipped(bindEither);
|
||||||
var decodeJson3 = /* @__PURE__ */ decodeJson(decodeJsonExbloInfo);
|
var decodeJson3 = /* @__PURE__ */ decodeJson(decodeJsonExbloInfo);
|
||||||
var show9 = /* @__PURE__ */ show(showJsonDecodeError);
|
var show9 = /* @__PURE__ */ show(showJsonDecodeError);
|
||||||
var map38 = /* @__PURE__ */ map(functorHalogenM);
|
var map39 = /* @__PURE__ */ map(functorHalogenM);
|
||||||
var Navigate = /* @__PURE__ */ function() {
|
var Navigate = /* @__PURE__ */ function() {
|
||||||
function Navigate2(value0, value1) {
|
function Navigate2(value0, value1) {
|
||||||
this.value0 = value0;
|
this.value0 = value0;
|
||||||
|
|
@ -15170,7 +15281,7 @@
|
||||||
;
|
;
|
||||||
throw new Error("Failed pattern match at Exblo.Router (line 73, column 5 - line 80, column 69): " + [res.constructor.name]);
|
throw new Error("Failed pattern match at Exblo.Router (line 73, column 5 - line 80, column 69): " + [res.constructor.name]);
|
||||||
}())(function() {
|
}())(function() {
|
||||||
return bind11(map38(function() {
|
return bind11(map39(function() {
|
||||||
var $97 = parse(routeCodec);
|
var $97 = parse(routeCodec);
|
||||||
return function($98) {
|
return function($98) {
|
||||||
return hush($97($98));
|
return hush($97($98));
|
||||||
|
|
@ -15229,7 +15340,7 @@
|
||||||
var pure16 = /* @__PURE__ */ pure(applicativeAff);
|
var pure16 = /* @__PURE__ */ pure(applicativeAff);
|
||||||
var bindFlipped1 = /* @__PURE__ */ bindFlipped(bindMaybe);
|
var bindFlipped1 = /* @__PURE__ */ bindFlipped(bindMaybe);
|
||||||
var pure17 = /* @__PURE__ */ pure(applicativeEffect);
|
var pure17 = /* @__PURE__ */ pure(applicativeEffect);
|
||||||
var map39 = /* @__PURE__ */ map(functorEffect);
|
var map40 = /* @__PURE__ */ map(functorEffect);
|
||||||
var discard7 = /* @__PURE__ */ discard(discardUnit);
|
var discard7 = /* @__PURE__ */ discard(discardUnit);
|
||||||
var throwError3 = /* @__PURE__ */ throwError(monadThrowAff);
|
var throwError3 = /* @__PURE__ */ throwError(monadThrowAff);
|
||||||
var selectElement = function(query3) {
|
var selectElement = function(query3) {
|
||||||
|
|
@ -15247,7 +15358,7 @@
|
||||||
return function __do2() {
|
return function __do2() {
|
||||||
var rs = bindFlipped10(readyState)(bindFlipped10(document)(windowImpl))();
|
var rs = bindFlipped10(readyState)(bindFlipped10(document)(windowImpl))();
|
||||||
if (rs instanceof Loading) {
|
if (rs instanceof Loading) {
|
||||||
var et = map39(toEventTarget)(windowImpl)();
|
var et = map40(toEventTarget)(windowImpl)();
|
||||||
var listener = eventListener(function(v) {
|
var listener = eventListener(function(v) {
|
||||||
return callback(new Right(unit));
|
return callback(new Right(unit));
|
||||||
})();
|
})();
|
||||||
|
|
@ -15344,7 +15455,7 @@
|
||||||
var fork3 = /* @__PURE__ */ fork(monadForkAff);
|
var fork3 = /* @__PURE__ */ fork(monadForkAff);
|
||||||
var parSequence_2 = /* @__PURE__ */ parSequence_(parallelAff)(applicativeParAff)(foldableList);
|
var parSequence_2 = /* @__PURE__ */ parSequence_(parallelAff)(applicativeParAff)(foldableList);
|
||||||
var pure18 = /* @__PURE__ */ pure(applicativeAff);
|
var pure18 = /* @__PURE__ */ pure(applicativeAff);
|
||||||
var map40 = /* @__PURE__ */ map(functorCoyoneda);
|
var map41 = /* @__PURE__ */ map(functorCoyoneda);
|
||||||
var parallel3 = /* @__PURE__ */ parallel(parallelAff);
|
var parallel3 = /* @__PURE__ */ parallel(parallelAff);
|
||||||
var map115 = /* @__PURE__ */ map(functorAff);
|
var map115 = /* @__PURE__ */ map(functorAff);
|
||||||
var sequential2 = /* @__PURE__ */ sequential(parallelAff);
|
var sequential2 = /* @__PURE__ */ sequential(parallelAff);
|
||||||
|
|
@ -15418,7 +15529,7 @@
|
||||||
return function(ref2) {
|
return function(ref2) {
|
||||||
return function(q2) {
|
return function(q2) {
|
||||||
return bind14(liftEffect6(read(ref2)))(function(v) {
|
return bind14(liftEffect6(read(ref2)))(function(v) {
|
||||||
return evalM(render5)(ref2)(v["component"]["eval"](new Query(map40(Just.create)(liftCoyoneda(q2)), $$const(Nothing.value))));
|
return evalM(render5)(ref2)(v["component"]["eval"](new Query(map41(Just.create)(liftCoyoneda(q2)), $$const(Nothing.value))));
|
||||||
});
|
});
|
||||||
};
|
};
|
||||||
};
|
};
|
||||||
|
|
@ -15628,7 +15739,7 @@
|
||||||
var parSequence_3 = /* @__PURE__ */ parSequence_(parallelAff)(applicativeParAff)(foldableList);
|
var parSequence_3 = /* @__PURE__ */ parSequence_(parallelAff)(applicativeParAff)(foldableList);
|
||||||
var liftEffect7 = /* @__PURE__ */ liftEffect(monadEffectAff);
|
var liftEffect7 = /* @__PURE__ */ liftEffect(monadEffectAff);
|
||||||
var pure19 = /* @__PURE__ */ pure(applicativeEffect);
|
var pure19 = /* @__PURE__ */ pure(applicativeEffect);
|
||||||
var map41 = /* @__PURE__ */ map(functorEffect);
|
var map42 = /* @__PURE__ */ map(functorEffect);
|
||||||
var pure110 = /* @__PURE__ */ pure(applicativeAff);
|
var pure110 = /* @__PURE__ */ pure(applicativeAff);
|
||||||
var when3 = /* @__PURE__ */ when(applicativeEffect);
|
var when3 = /* @__PURE__ */ when(applicativeEffect);
|
||||||
var renderStateX2 = /* @__PURE__ */ renderStateX(functorEffect);
|
var renderStateX2 = /* @__PURE__ */ renderStateX(functorEffect);
|
||||||
|
|
@ -15726,7 +15837,7 @@
|
||||||
return function(childrenOutRef) {
|
return function(childrenOutRef) {
|
||||||
return unComponentSlot(function(slot3) {
|
return unComponentSlot(function(slot3) {
|
||||||
return function __do2() {
|
return function __do2() {
|
||||||
var childrenIn = map41(slot3.pop)(read(childrenInRef))();
|
var childrenIn = map42(slot3.pop)(read(childrenInRef))();
|
||||||
var $$var2 = function() {
|
var $$var2 = function() {
|
||||||
if (childrenIn instanceof Just) {
|
if (childrenIn instanceof Just) {
|
||||||
write(childrenIn.value0.value1)(childrenInRef)();
|
write(childrenIn.value0.value1)(childrenInRef)();
|
||||||
|
|
@ -15756,7 +15867,7 @@
|
||||||
;
|
;
|
||||||
throw new Error("Failed pattern match at Halogen.Aff.Driver (line 213, column 14 - line 222, column 98): " + [childrenIn.constructor.name]);
|
throw new Error("Failed pattern match at Halogen.Aff.Driver (line 213, column 14 - line 222, column 98): " + [childrenIn.constructor.name]);
|
||||||
}();
|
}();
|
||||||
var isDuplicate = map41(function($69) {
|
var isDuplicate = map42(function($69) {
|
||||||
return isJust(slot3.get($69));
|
return isJust(slot3.get($69));
|
||||||
})(read(childrenOutRef))();
|
})(read(childrenOutRef))();
|
||||||
when3(isDuplicate)(warn("Halogen: Duplicate slot address was detected during rendering, unexpected results may occur"))();
|
when3(isDuplicate)(warn("Halogen: Duplicate slot address was detected during rendering, unexpected results may occur"))();
|
||||||
|
|
@ -15782,7 +15893,7 @@
|
||||||
return function($$var2) {
|
return function($$var2) {
|
||||||
return function __do2() {
|
return function __do2() {
|
||||||
var v = read($$var2)();
|
var v = read($$var2)();
|
||||||
var shouldProcessHandlers = map41(isNothing)(read(v.pendingHandlers))();
|
var shouldProcessHandlers = map42(isNothing)(read(v.pendingHandlers))();
|
||||||
when3(shouldProcessHandlers)(write(new Just(Nil.value))(v.pendingHandlers))();
|
when3(shouldProcessHandlers)(write(new Just(Nil.value))(v.pendingHandlers))();
|
||||||
write(empty6)(v.childrenOut)();
|
write(empty6)(v.childrenOut)();
|
||||||
write(v.children)(v.childrenIn)();
|
write(v.children)(v.childrenIn)();
|
||||||
|
|
@ -15975,15 +16086,15 @@
|
||||||
}
|
}
|
||||||
|
|
||||||
// output/Web.DOM.Node/index.js
|
// output/Web.DOM.Node/index.js
|
||||||
var map42 = /* @__PURE__ */ map(functorEffect);
|
var map43 = /* @__PURE__ */ map(functorEffect);
|
||||||
var parentNode2 = /* @__PURE__ */ function() {
|
var parentNode2 = /* @__PURE__ */ function() {
|
||||||
var $6 = map42(toMaybe);
|
var $6 = map43(toMaybe);
|
||||||
return function($7) {
|
return function($7) {
|
||||||
return $6(_parentNode($7));
|
return $6(_parentNode($7));
|
||||||
};
|
};
|
||||||
}();
|
}();
|
||||||
var nextSibling = /* @__PURE__ */ function() {
|
var nextSibling = /* @__PURE__ */ function() {
|
||||||
var $15 = map42(toMaybe);
|
var $15 = map43(toMaybe);
|
||||||
return function($16) {
|
return function($16) {
|
||||||
return $15(_nextSibling($16));
|
return $15(_nextSibling($16));
|
||||||
};
|
};
|
||||||
|
|
@ -16013,7 +16124,7 @@
|
||||||
var identity15 = /* @__PURE__ */ identity(categoryFn);
|
var identity15 = /* @__PURE__ */ identity(categoryFn);
|
||||||
var bind17 = /* @__PURE__ */ bind(bindAff);
|
var bind17 = /* @__PURE__ */ bind(bindAff);
|
||||||
var liftEffect8 = /* @__PURE__ */ liftEffect(monadEffectAff);
|
var liftEffect8 = /* @__PURE__ */ liftEffect(monadEffectAff);
|
||||||
var map43 = /* @__PURE__ */ map(functorEffect);
|
var map44 = /* @__PURE__ */ map(functorEffect);
|
||||||
var bindFlipped13 = /* @__PURE__ */ bindFlipped(bindEffect);
|
var bindFlipped13 = /* @__PURE__ */ bindFlipped(bindEffect);
|
||||||
var substInParent = function(v) {
|
var substInParent = function(v) {
|
||||||
return function(v1) {
|
return function(v1) {
|
||||||
|
|
@ -16161,7 +16272,7 @@
|
||||||
var runUI2 = function(component6) {
|
var runUI2 = function(component6) {
|
||||||
return function(i2) {
|
return function(i2) {
|
||||||
return function(element3) {
|
return function(element3) {
|
||||||
return bind17(liftEffect8(map43(toDocument)(bindFlipped13(document)(windowImpl))))(function(document2) {
|
return bind17(liftEffect8(map44(toDocument)(bindFlipped13(document)(windowImpl))))(function(document2) {
|
||||||
return runUI(renderSpec(document2)(element3))(component6)(i2);
|
return runUI(renderSpec(document2)(element3))(component6)(i2);
|
||||||
});
|
});
|
||||||
};
|
};
|
||||||
|
|
|
||||||
|
|
@ -142,3 +142,8 @@ type Block =
|
||||||
, tx :: Array String
|
, tx :: Array String
|
||||||
}
|
}
|
||||||
|
|
||||||
|
type ShortBlock =
|
||||||
|
{ hash :: String
|
||||||
|
, height :: Int
|
||||||
|
, time :: Int
|
||||||
|
}
|
||||||
|
|
|
||||||
|
|
@ -3,6 +3,7 @@ module Exblo.Home where
|
||||||
import Prelude
|
import Prelude
|
||||||
import Control.Monad.Rec.Class (forever)
|
import Control.Monad.Rec.Class (forever)
|
||||||
import Simple.JSON (readJSON)
|
import Simple.JSON (readJSON)
|
||||||
|
import Affjax.StatusCode (StatusCode(..))
|
||||||
import Affjax.Web as AX
|
import Affjax.Web as AX
|
||||||
import Affjax.ResponseFormat as AXRF
|
import Affjax.ResponseFormat as AXRF
|
||||||
import Data.Maybe (Maybe(..))
|
import Data.Maybe (Maybe(..))
|
||||||
|
|
@ -12,9 +13,9 @@ import Effect.Aff as Aff
|
||||||
import Effect.Aff.Class (class MonadAff)
|
import Effect.Aff.Class (class MonadAff)
|
||||||
import Effect.Class.Console (log)
|
import Effect.Class.Console (log)
|
||||||
import Effect.Aff (Milliseconds(..))
|
import Effect.Aff (Milliseconds(..))
|
||||||
import Exblo.API (ZcashNet(..))
|
import Exblo.API (ZcashNet(..), ShortBlock)
|
||||||
import Exblo.Navigate (class Navigate, navigate, Route(..))
|
import Exblo.Navigate (class Navigate, navigate, Route(..))
|
||||||
import Exblo.Utils (css)
|
import Exblo.Utils (css, convertToDate, safeHref)
|
||||||
import Exblo.Store as S
|
import Exblo.Store as S
|
||||||
import Halogen as H
|
import Halogen as H
|
||||||
import Halogen.HTML as HH
|
import Halogen.HTML as HH
|
||||||
|
|
@ -36,6 +37,7 @@ type State =
|
||||||
, network :: ZcashNet
|
, network :: ZcashNet
|
||||||
, zebra :: String
|
, zebra :: String
|
||||||
, version :: String
|
, version :: String
|
||||||
|
, recents :: RemoteData String (Array ShortBlock)
|
||||||
}
|
}
|
||||||
|
|
||||||
data Action
|
data Action
|
||||||
|
|
@ -48,7 +50,7 @@ data Action
|
||||||
component :: forall q o m. MonadAff m => MonadStore S.Action S.Store m => Navigate m => H.Component q Input o m
|
component :: forall q o m. MonadAff m => MonadStore S.Action S.Store m => Navigate m => H.Component q Input o m
|
||||||
component = connect selectAll $
|
component = connect selectAll $
|
||||||
H.mkComponent
|
H.mkComponent
|
||||||
{ initialState: \_ -> { block: NotAsked, term: "", network: TestNet, zebra: "", version: "" }
|
{ initialState: \_ -> { block: NotAsked, term: "", network: TestNet, zebra: "", version: "", recents: NotAsked }
|
||||||
, render
|
, render
|
||||||
, eval: H.mkEval H.defaultEval { handleAction = handleAction, receive = Just <<< Receive, initialize = Just Initialize }
|
, eval: H.mkEval H.defaultEval { handleAction = handleAction, receive = Just <<< Receive, initialize = Just Initialize }
|
||||||
}
|
}
|
||||||
|
|
@ -88,6 +90,35 @@ render state =
|
||||||
[ HH.i [ css "ri-search-line ri-xl" ] [] ]
|
[ HH.i [ css "ri-search-line ri-xl" ] [] ]
|
||||||
]
|
]
|
||||||
]
|
]
|
||||||
|
, case state.recents of
|
||||||
|
NotAsked -> HH.div_ []
|
||||||
|
Loading ->
|
||||||
|
HH.div
|
||||||
|
[ css "card" ]
|
||||||
|
[ HH.text "Processing data..."
|
||||||
|
]
|
||||||
|
Failure e ->
|
||||||
|
HH.div
|
||||||
|
[ css "card" ]
|
||||||
|
[ HH.text $ show e
|
||||||
|
]
|
||||||
|
Success blks ->
|
||||||
|
HH.div
|
||||||
|
[ css "card" ]
|
||||||
|
[ HH.h3_ [ HH.text "recent blocks" ]
|
||||||
|
, HH.table_
|
||||||
|
( [ HH.tr_ [ HH.th_ [ HH.text "mined" ], HH.th_ [ HH.text "hash" ] ] ] <>
|
||||||
|
( map
|
||||||
|
( \b ->
|
||||||
|
HH.tr_
|
||||||
|
[ HH.td_ [ HH.text $ convertToDate b.time ]
|
||||||
|
, HH.td_ [ HH.a [ safeHref $ Blk $ show b.height ] [ HH.text b.hash ] ]
|
||||||
|
]
|
||||||
|
)
|
||||||
|
blks
|
||||||
|
)
|
||||||
|
)
|
||||||
|
]
|
||||||
, HH.table
|
, HH.table
|
||||||
[ css "footer" ]
|
[ css "footer" ]
|
||||||
[ HH.tr_
|
[ HH.tr_
|
||||||
|
|
@ -117,7 +148,7 @@ render state =
|
||||||
, HH.text "Server: "
|
, HH.text "Server: "
|
||||||
, HH.text state.version
|
, HH.text state.version
|
||||||
, HH.br_
|
, HH.br_
|
||||||
, HH.text "UI: 0.3.0.0"
|
, HH.text "UI: 0.3.1.0"
|
||||||
, HH.br_
|
, HH.br_
|
||||||
, HH.text "Zebra Node: "
|
, HH.text "Zebra Node: "
|
||||||
, HH.text state.zebra
|
, HH.text state.zebra
|
||||||
|
|
@ -135,8 +166,9 @@ handleAction = case _ of
|
||||||
H.modify_ _ { network = st.network, zebra = st.zebraVersion, version = st.version }
|
H.modify_ _ { network = st.network, zebra = st.zebraVersion, version = st.version }
|
||||||
handleAction Refresh
|
handleAction Refresh
|
||||||
Refresh -> do
|
Refresh -> do
|
||||||
H.modify_ _ { block = Loading }
|
H.modify_ _ { block = Loading, recents = Loading }
|
||||||
res <- H.liftAff $ AX.get AXRF.string ("https://api.exblo.app/getblock")
|
res <- H.liftAff $ AX.get AXRF.string ("https://api.exblo.app/getblock")
|
||||||
|
resList <- H.liftAff $ AX.get AXRF.string ("https://api.exblo.app/getrecentblocks")
|
||||||
case res of
|
case res of
|
||||||
Left err -> do
|
Left err -> do
|
||||||
log $ "/block response failed to decode: " <> AX.printError err
|
log $ "/block response failed to decode: " <> AX.printError err
|
||||||
|
|
@ -150,6 +182,17 @@ handleAction = case _ of
|
||||||
log $ "Can't parse JSON. " <> show e
|
log $ "Can't parse JSON. " <> show e
|
||||||
H.modify_ _
|
H.modify_ _
|
||||||
{ block = Failure "Failed to parse response" }
|
{ block = Failure "Failed to parse response" }
|
||||||
|
case resList of
|
||||||
|
Left err -> do
|
||||||
|
log $ "/getrecentblocks response failed to decode: " <> AX.printError err
|
||||||
|
Right listResponse -> do
|
||||||
|
if listResponse.status == StatusCode 200 then case readJSON listResponse.body of
|
||||||
|
Right (rb :: Array ShortBlock) ->
|
||||||
|
H.modify_ _ { recents = Success rb }
|
||||||
|
Left e -> do
|
||||||
|
log $ "Can't parse JSON. " <> show e
|
||||||
|
H.modify_ _ { recents = Failure "Failed to parse response" }
|
||||||
|
else H.modify_ _ { recents = Failure "Error in API server" }
|
||||||
SetTerm s -> do
|
SetTerm s -> do
|
||||||
H.modify_ _ { term = s }
|
H.modify_ _ { term = s }
|
||||||
Receive { context: store, input: inp } -> do
|
Receive { context: store, input: inp } -> do
|
||||||
|
|
@ -157,8 +200,7 @@ handleAction = case _ of
|
||||||
Search event -> do
|
Search event -> do
|
||||||
H.liftEffect $ Event.preventDefault event
|
H.liftEffect $ Event.preventDefault event
|
||||||
term <- H.gets _.term
|
term <- H.gets _.term
|
||||||
if (SC.length term /= 64)
|
if (SC.length term /= 64) then navigate $ Blk term
|
||||||
then navigate $ Blk term
|
|
||||||
else navigate $ Tx term
|
else navigate $ Tx term
|
||||||
|
|
||||||
timer :: forall m a. MonadAff m => a -> m (HS.Emitter a)
|
timer :: forall m a. MonadAff m => a -> m (HS.Emitter a)
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue