remove idea about moving into GADT
This commit is contained in:
parent
cdd88b080a
commit
c72fa2bcd8
|
@ -16,14 +16,3 @@ a mouthful!
|
||||||
Since only 2 places in the propellor source code currently need to deal
|
Since only 2 places in the propellor source code currently need to deal
|
||||||
with this, it doesn't currently seem worth making the change, unless a less
|
with this, it doesn't currently seem worth making the change, unless a less
|
||||||
intrusive way can be found.
|
intrusive way can be found.
|
||||||
|
|
||||||
Probably related would be to make RevertableProperty a constructor in the
|
|
||||||
Property GADT, which would allow more property combinators to work on
|
|
||||||
RevertableProperties. That would look like:
|
|
||||||
|
|
||||||
data Propety i where
|
|
||||||
...
|
|
||||||
RProp :: Property i1 -> Property i2 -> Property (CInfo i1 i2)
|
|
||||||
|
|
||||||
In this case, there's only one Info/NoInfo encompassing both sides, and
|
|
||||||
so ensureProperty could only be used on it if both sides were NoInfo.
|
|
||||||
|
|
Loading…
Reference in New Issue