简单的Lisp案例陈述问题-与nil相比的问题

如何解决简单的Lisp案例陈述问题-与nil相比的问题

| 我正在尝试使用case语句使某些代码更具可读性。它似乎可以作为一系列的if语句工作,但是由于某种原因,case语句始终接受与nil的比较,即使它不是真的。有人可以澄清为什么会发生这种现象吗? 例:
> (case \'a            
    (nil nil)         
    (otherwise \'b))   
NIL                   
> (case \'a            
    (\'a \'b)           
    (otherwise nil))  
B                       
在上面的示例中,即使\'a显然不是nil,第一个实例也返回nil。尝试对if语句执行与预期相同的操作:
> (if (eq \'a nil) nil \'b)    
B                            
> (if (eq \'a \'a) \'b nil)     
B                            
我假设我不理解有关case语句的某些行为。任何帮助,将不胜感激。 编辑: 只是为了澄清,我知道\'a \不会被评估。我只是模拟了这个示例,以创建一种情况,其中case语句的目标绝对不是nil。 我正在使用xlisp-plus,但我将尝试进行真正的clisp安装,并查看其行为是否有所不同。 编辑(再编辑一次): 安装了CLISP,在那可以正常工作。调查xlisp为何与众不同的麻烦真的不值得。谢谢大家的检查。     

解决方法

我认为这取决于您的LISP版本。 我在Mac上安装了LispWorks,结果是:
CL-USER 2 : 1 > (case \'a            
    (nil nil)         
    (otherwise \'b))   
B
    ,“ 3”中的每个关键规范都可以是文字列表或单个原子。但是,CLtL表示原子不得为
NIL
,因为它对于字面意义是ѭ4an还是空白列表均不明确。请使用
NIL
列表:
> (case \'a
    ((nil) nil)         
    (otherwise \'b))
B
> (case nil
    ((nil) nil)         
    (otherwise \'b))
NIL
    ,Common Lisp希望CASE将该项目测试为原子或原子列表。测试也是功能EQL。
(case \'a
  (a \'b)    ; EQL a
  (otherwise \'foo))

(case \'a
  ((a b c) \'foo)   ; EQL to one of a,b or c
  (otherwise \'bar))
引用仅适用于偶然的情况。不要使用它:
; don\'t use this:
(case \'a
  (\'a \'foo)    ; <- bad!,EQL to QUOTE or A
  (otherwise \'bar))
上面是一样的:
; don\'t use this:
(case \'a
  ((quote a) \'foo)   ; <- bad!,EQL to QUOTE or A
  (otherwise \'bar))
    ,与SBCL相同:
CL-USER> (case \'a
           (nil nil)
           (otherwise \'b))
B
就是说,“ 12”是一个符号,因此永远不能是“ 13”。     ,
case
形式的值是文字的隐式引用列表,因此:
(case \'a
  ((a) \'b)
  (otherwise nil))
是你想要的。
otherwise
应该可以工作(正如其他人所说的)-尝试try17ѭ。 顺便说一句,当您使用
\'a
时,阅读器会将其读取为
(quote a)
,这意味着当值是
quote
时也会选择它,例如:
(case \'quote
  (\'a \'b)
  (otherwise nil))
    

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。

相关推荐


依赖报错 idea导入项目后依赖报错,解决方案:https://blog.csdn.net/weixin_42420249/article/details/81191861 依赖版本报错:更换其他版本 无法下载依赖可参考:https://blog.csdn.net/weixin_42628809/a
错误1:代码生成器依赖和mybatis依赖冲突 启动项目时报错如下 2021-12-03 13:33:33.927 ERROR 7228 [ main] o.s.b.d.LoggingFailureAnalysisReporter : *************************** APPL
错误1:gradle项目控制台输出为乱码 # 解决方案:https://blog.csdn.net/weixin_43501566/article/details/112482302 # 在gradle-wrapper.properties 添加以下内容 org.gradle.jvmargs=-Df
错误还原:在查询的过程中,传入的workType为0时,该条件不起作用 &lt;select id=&quot;xxx&quot;&gt; SELECT di.id, di.name, di.work_type, di.updated... &lt;where&gt; &lt;if test=&qu
报错如下,gcc版本太低 ^ server.c:5346:31: 错误:‘struct redisServer’没有名为‘server_cpulist’的成员 redisSetCpuAffinity(server.server_cpulist); ^ server.c: 在函数‘hasActiveC
解决方案1 1、改项目中.idea/workspace.xml配置文件,增加dynamic.classpath参数 2、搜索PropertiesComponent,添加如下 &lt;property name=&quot;dynamic.classpath&quot; value=&quot;tru
删除根组件app.vue中的默认代码后报错:Module Error (from ./node_modules/eslint-loader/index.js): 解决方案:关闭ESlint代码检测,在项目根目录创建vue.config.js,在文件中添加 module.exports = { lin
查看spark默认的python版本 [root@master day27]# pyspark /home/software/spark-2.3.4-bin-hadoop2.7/conf/spark-env.sh: line 2: /usr/local/hadoop/bin/hadoop: No s
使用本地python环境可以成功执行 import pandas as pd import matplotlib.pyplot as plt # 设置字体 plt.rcParams[&#39;font.sans-serif&#39;] = [&#39;SimHei&#39;] # 能正确显示负号 p
错误1:Request method ‘DELETE‘ not supported 错误还原:controller层有一个接口,访问该接口时报错:Request method ‘DELETE‘ not supported 错误原因:没有接收到前端传入的参数,修改为如下 参考 错误2:cannot r
错误1:启动docker镜像时报错:Error response from daemon: driver failed programming external connectivity on endpoint quirky_allen 解决方法:重启docker -&gt; systemctl r
错误1:private field ‘xxx‘ is never assigned 按Altʾnter快捷键,选择第2项 参考:https://blog.csdn.net/shi_hong_fei_hei/article/details/88814070 错误2:启动时报错,不能找到主启动类 #
报错如下,通过源不能下载,最后警告pip需升级版本 Requirement already satisfied: pip in c:\users\ychen\appdata\local\programs\python\python310\lib\site-packages (22.0.4) Coll
错误1:maven打包报错 错误还原:使用maven打包项目时报错如下 [ERROR] Failed to execute goal org.apache.maven.plugins:maven-resources-plugin:3.2.0:resources (default-resources)
错误1:服务调用时报错 服务消费者模块assess通过openFeign调用服务提供者模块hires 如下为服务提供者模块hires的控制层接口 @RestController @RequestMapping(&quot;/hires&quot;) public class FeignControl
错误1:运行项目后报如下错误 解决方案 报错2:Failed to execute goal org.apache.maven.plugins:maven-compiler-plugin:3.8.1:compile (default-compile) on project sb 解决方案:在pom.
参考 错误原因 过滤器或拦截器在生效时,redisTemplate还没有注入 解决方案:在注入容器时就生效 @Component //项目运行时就注入Spring容器 public class RedisBean { @Resource private RedisTemplate&lt;String
使用vite构建项目报错 C:\Users\ychen\work&gt;npm init @vitejs/app @vitejs/create-app is deprecated, use npm init vite instead C:\Users\ychen\AppData\Local\npm-