prescientmoon/solar-conflux
prescientmoon/solar-conflux
1
Fork 0
Code Activity

typescript(option): feat: added a "flat" helper

Browse source 
Signed-off-by: prescientmoon <git@moonythm.dev>
This commit is contained in:
Matei Adriel 2019-12-19 14:34:48 +02:00 • committed by prescientmoon
parent 17569d9417
commit c9cc0b0f22
Signed by: prescientmoon
SSH key fingerprint: SHA256:UUF9JT2s8Xfyv76b8ZuVL7XrmimH4o49p4b+iexbVH4
2 changed files with 6 additions and 2 deletions
typescript/option/src
helpers.ts

6
typescript/option/src/helpers.ts
View file

@ -1,7 +1,7 @@
import { Option, Some, None } from './types'
import { Binder, Folder, Mapper, Predicate, BackFolder } from './internalTypes'
import { always, identity } from './internalHelperts'
import Internals, { SomeClass } from './internals'
import Internals, { SomeClass, isOption } from './internals'
export const isSome = <T>(option: Option<T>) =>
option instanceof Internals.SomeClass
@ -89,3 +89,7 @@ export const toNullable = <T>(option: Option<T>) => {
export const withDefault = <T>(_default: T, option: Option<T>) => {
return match(option, identity, always(_default))
}
export const flat = <T>(option: Option<Option<T>>) => {
return bind(inner => (isSome(inner) ? flat(inner) : inner), option)
}