haskell - “Illegal type synonym family application in instance” with functional dependency -


i have multi-parameter typeclass functional dependency:

class multi b | -> b

i have simple, non-injective type synonym family:

type family fam

i want write instance of multi uses fam in second parameter, this:

instance multi (maybe a) (fam a)

however, instance not accepted. ghc complains following error message:

error:   • illegal type synonym family application in instance: fam   • in instance declaration ‘multi (maybe a) (fam a)’

fortunately, there workaround. can perform usual trick moving type out of instance head , equality constraint:

instance (b ~ fam a) => multi (maybe a) b

this instance accepted! however, got thinking, , started wonder why transformation not applied all instances of multi. after all, doesn’t functional dependency imply there can 1 b per a, anyway? in situation, seems there no reason ghc should reject first instance.

i found ghc trac ticket #3485, describes similar situation, typeclass did not involve functional dependency, ticket (rightfully) closed invalid. in situation, however, think functional dependency avoids problem described in ticket. there i’m overlooking, or oversight/missing feature in ghc?


Comments

Post a Comment

Popular posts from this blog

vue.js - Create hooks for automated testing -

Image
qa guys complained can't automate frontend testing. because our html looks same outside. lazy hack did this <template> <div :role="$options.name"> ... </div> </template> <script> export default { name: 'vmcomponentname' } </script> which takes name script , applies html. in browser get: <div role="vmcomponentname"> ... </div> line :role="$options.name" goes in every component. is there dry er solutions? please share. additional details i'll explain in details looking for. imagine have vmusercreate form creates user. test case can create user . to automatically test without role, have use following selector: .wrapper > .wrapper > .wrapper > .submit-button the test extremely brittle (will break lot). if use roles can use [role="vmusercreateform"] .submit-button selector. many folds less brittle. so basically, i'm ...
Read more

php - Vagrant up error - Uncaught Reflection Exception: Class DOMDocument does not exist -

i've set bento/ubuntu-16.04 vagrant box using php 5.6, , getting following error quite few times when try , run shell script: "uncaught reflection exception: class domdocument not exist". i've tried adding following top of script (not together), each no success: "sudo apt-get install php5.6-xml", "sudo apt-get install php5-xml", "sudo apt-get install php-dom" i've tried resetting server "sudo service apache2 restart". does have suggestions?
Read more

serial port - hub4com OVERRUN Error -

i trying split physical serial port (com3) 2 or more virtual ports using com0com create virtual ports , hub4com split them. here commands use create virtual ports: install 0 portname=com100 portname=com101 change com100 emubr=yes, emuoverrun=yes change com101 emubr=yes, emuoverrun=yes install 1 portname=com110 portname=com111 change com110 emubr=yes, emuoverrun=yes change com111 emubr=yes, emuoverrun=yes the commands use split port: hub4com --route=0:all --baud=115200 \\.\com3 --baud=115200 \\.\com101 --baud=115200 \\.\com111 here output along error get: com3 open("\\.\com3", baud=115200, data=8, parity=no, stop=1, octs=on, odsr=off, ox=off, ix=off, idsr=off, ito=0) - ok com101 open("\\.\com101", baud=115200, data=8, parity=no, stop=1, octs=on, odsr=off, ox=off, ix=off, idsr=off, ito=0) - ok com111 open("\\.\com111", baud=115200, data=8, parity=no, stop=1, octs=on, odsr=off, ox=off...
Read more