This commit is contained in:
Arya Irani 2018-06-29 17:09:51 -04:00
parent cd04013e70
commit 1d0f546a53
2 changed files with 2 additions and 7 deletions

View File

@ -287,12 +287,14 @@ object Stream {
() => { i += by; k(doubleToUnboxed(i),null) }
}
/** intended to be called from Unison code */
final def fromInt64(u: U): Stream[UnboxedType] =
k => {
var i = unboxedToLong(u) - 1
() => { i += 1; k(longToUnboxed(i), UnboxedType.Int64) }
}
/** intended to be called from Unison code */
final def fromUInt64(u: U): Stream[UnboxedType] =
k => {
var i = unboxedToLong(u) - 1

View File

@ -19,11 +19,4 @@ ten-simple =
sum = Stream.fold-left 0 (+) t
sum * 10000 + p + q + r + s
-- ten-simpler =
-- t = Stream.take 10 (Stream.map fib4 (Stream.from-uint64 0))
-- sum = Stream.fold-left 0 (+) t
-- sum + 1
--
-- sum4 a b c d = a + b + c + d
ten-simple