- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
作为练习,我决定在 Haskell 中实现一个 Blank
类型类(其中 blank
为空时为 true,False
或仅包含空格的String
)。我简单地开始了:
class Blank a where
blank :: a -> Bool
instance Blank Bool where
blank = not
instance Blank [a] where
blank = null
当我去实现String
实例时:
instance Blank String where
blank [] = True
blank (' ':xs) = blank xs
blank ('\t':xs) = blank xs
blank ('\n':xs) = blank xs
blank ('\r':xs) = blank xs
blank _ = False
我收到了错误消息:
Illegal instance declaration for `Blank String'
(All instance types must be of the form (T t1 ... tn)
where T is not a synonym.
Use -XTypeSynonymInstances if you want to disable this.)
In the instance declaration for `Blank String'
我很确定这是因为 [a]
和 String
是多余的,即 String
([Char]
) 是 [a]
的更具体实例。
有没有办法解决这个问题并定义一个更具体的实例(即[Char]
)?
最佳答案
有一个标准技巧可以以优雅的方式实现您想要的目标。如果您考虑要做什么,您应该记住一个使用它的标准且常用的类:Show
。
也许你从来没有想过 show [1,2,3] == "[1, 2, 3]"
而 show "hello"== "\"hello\""
,但问题是一样的。解决这个问题的方法是向 Show
类添加一个 showList::[a] -> ShowS
操作,为其添加默认定义,然后提供通用列表的实例。
在你的情况下,你想要这样的东西:
import Data.Char(isSpace)
class Blank a where
blank :: a -> Bool
blankList :: [a] -> Bool
blankList = null
instance Blank a => Blank [a] where
blank = blankList
instance Blank Char where
blank = isSpace
blankList [] = True
blankList (' ':xs) = blankList xs
blankList ('\t':xs) = blankList xs
blankList ('\n':xs) = blankList xs
blankList ('\r':xs) = blankList xs
blankList _ = False
这样,每当您在列表上调用 blank
时,都会调用相应的 blankList
方法。使用的方法是列表的元素实例提供的方法,因此Char
实例可以定义blankList
来返回True
当列表非空但仅包含空格等时,而其他实例可以简单地使用 null
的默认实现。
此实现的缺点是您必须将 String
的操作放入 Char
的实例中。然而,没有办法解决这个问题:在 Haskell 98/2010 中,类型构造函数和类只能有一个实例,因此一旦定义了 Blank [a]
实例,就无法使用 拥有其他实例[]
,其中包括String
。
将 Blank [a]
的实例替换为 Blank a => Blank [a]
的实例可让您仅为 [] 定义一个实例
但是它的行为会根据Blank a
的实例而变化,因此您可以特殊情况String
。
如前所述,另一种解决方案是根本不处理 String
。您始终可以定义:
newtype MyString = MyString String
然后使用MyString
代替String
。
关于haskell - 字符串和 [a] 实例,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/31724714/
有没有一种方法可以使用标准类型构造函数(例如 int、set、dict、list、tuple 等)以用户定义的方式将用户定义类的实例强制转换为其中一种类型?例如 class Example:
我知道这个问题在Stackoverflow中有很多问题,但是即使有很多答案,这些答案也帮不了我什么,也没有找到答案。 在我的WebAPP中,它可以正常工作,但是当我将其转换为API时,它失败了(主题标
这个问题已经有答案了: Why does the ternary operator unexpectedly cast integers? (3 个回答) 已关闭 9 年前。 最近遇到一个Java的陷
我尝试使用 FirebaseApp.configure() 配置 Firebase,但遇到以下崩溃: *** Terminating app due to uncaught exception 'c
我有一个自连接员工实体类,其中包含与其自身相关的 id、name 和 ref 列。我想创建它的新实例并将其保存到数据库。 首先我创建了一个 Employee 类的实例并将其命名为 manager。然后
我有一个用于添加新公寓的表单,在该表单中我有一个下拉列表,用户可以在其中选择负责的人员。 显然,当您从下拉列表中选择并尝试保存公寓时,我的应用程序认为该人已被修改。它给了我下面的错误,指示我应该首先保
从 Visualforce 页面,我需要检索我们组织的 salesforce 实例的 URL,而不是 Visual Force URL。 例如我需要https://cs1.salesforce.com
我遇到了一些可能的问题答案,但这是关于从 Hibernate 3.4.0GA 升级到 Hibernate 4.1.8 的问题。所以这曾经在以前的版本下工作,我已经四处搜索了为什么它在这个新版本中出现了
似乎一遍又一遍地问这个问题,我仍然找不到解决我问题的答案。我在下面有一个域模型。每个新创建或更新的“安全用户”都需要我确保其具有配置文件,如果没有,则创建一个新的配置文件并分配给它。 配置文件的要求相
我很难调试为什么 JPA 不级联我的 @ManyToMany 关系。我发现的所有答案都与缺少级联语句有关。但我确实拥有它们并且仍然得到: Caused by: org.hibernate.Transi
Play 服务 API 表明有一个叫做 Instance ID 的东西 但是,在 Android Studio 中包含以下内容后,我无法导入 InstanceID 类 compile "com.goo
我正在使用 Seam 框架。我有 2 个实体: 请求.java @Entity @Table(name = "SRV_REQUEST") public class Request { private
This question处理构建一个适当的Monad来自单子(monad)的实例,但仅在某些约束下 - 例如Set .诀窍是将其包装成 ContT ,它将约束推迟到包装/展开其值。 现在我想对 Ap
我正在尝试执行此查询: StringBuffer sb = new StringBuffer(); sb.append("select p from PointsEntity p " + "where
我试图了解是否可以更改我的 hibernate 配置并使用单个 MySQL 实例(而不是我当前拥有的多个 MySQL 实例): 我有一个使用 hibernate 的 Java 应用程序,与 2 个模式
我有一个选项卡滑动布局,其中包括四个选项卡,每个选项卡都有自己的布局和 fragment ,在我的主要 Activity 布局中,viewpager 参与更改选项卡。特定 View (选项卡)在应用程
我看到很多帖子声称他们正在运行 MySql 的 RDS 实例,但无法连接到该实例,但我没有运行 RDS。 我使用 EC2 实例来托管我的 WordPress 博客,该博客是使用 Web 平台安装程序安
因为我在我的 ec-2 实例上的 python 虚拟环境中运行应用程序( Airflow ),并且我想在同一个 ec2 实例上的默认 python 环境中运行命令,所以我认为 ssh 到我自己的实例更
这个问题已经有答案了: How to fix the Hibernate "object references an unsaved transient instance - save the tra
例子: run APP1 .. ... run APP1 ... run APP2 如何在 APP2 中对 Vue 说我需要调用 APP1?
我是一名优秀的程序员,十分优秀!