github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-27 00:44:57 +03:00
Code Issues Projects Releases Wiki Activity

Add a Syntax to Cofree.

Browse Source
This commit is contained in:
Rob Rix 2015-10-14 09:43:51 -04:00
parent 0d662ade08
commit 59dd626361
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
prototype/Doubt/Cofree.swift
View File

@ -1,7 +1,7 @@
// Copyright © 2015 GitHub. All rights reserved.
public enum Cofree<B> {
case Unroll(B)
public enum Cofree<A, B> {
case Unroll(B, Syntax<Cofree, A>)
}
@ -10,7 +10,7 @@ public enum Cofree<B> {
extension Cofree {
var extract: B {
switch self {
case let .Unroll(b):
case let .Unroll(b, _):
return b
}
}