github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-29 11:02:26 +03:00
Code Issues Projects Releases Wiki Activity

🔥 FreeConvertible.

Browse Source
This commit is contained in:
Rob Rix 2015-10-16 09:20:14 -04:00
parent c5fe7bec46
commit b43badaf04
1 changed files with 0 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
prototype/Doubt/Free.swift
View File

@ -204,21 +204,4 @@ extension Free where A: CustomJSONConvertible {
} }
// MARK: - FreeConvertible
/// A hack to work around the unavailability of same-type requirements.
public protocol FreeConvertible {
typealias RollType
typealias PureType
init(free: Free<RollType, PureType>)
var free: Free<RollType, PureType> { get }
}
extension Free: FreeConvertible {
public init(free: Free<A, B>) { self = free }
public var free: Free { return self }
}
import Prelude import Prelude