使用列表项形成新符号

如何解决使用列表项形成新符号

说我在lisp中有两个列表

(setq a '(p q))
(setq b '(1 2))

(car a) is p
(car b) is 1

现在我想定义一个符号'(测试p 1),但是如果我在下面使用

(setq c '(test (car a) (car b)))

我得到'(测试(汽车a)(汽车b)) 这是可以理解的,但我只想知道如何将(汽车a)替换为p,将(汽车b)替换为1,并形成新的符号'(test p 1)

谢谢

解决方法

如果要列出列表,则所需的功能为list

(list 'test (car a) (car b))`

将是列表(test p 1)

请注意,quote(缩写为',所以'(x)(quote (x))相同的目的只是告诉评估者,后面的是文字数据,而不是码。因此,在(list 'test ...)中,它与(list (quote test) ...)相同,然后quote告诉评估者test被用作文字数据,而不是绑定名称,同样,'(p q)的意思是“这是一个包含元素pq的文字列表”,而(p q)的意思是“这是一种评估形式,其含义取决于什么p是')

,

首先,setq不应用于未绑定变量。您可以对已建立的变量使用setq。另外,对于全局变量,您应该使用*earmuffs*

(defparameter *a* '(p q))
(defparameter *b* '(1 2))
(car *a*) ; ==> p
(car *b*) ; ==> 1

引号将使用引号结构作为数据。这意味着您在写expr的所有'expr都不会对数据进行逐字评估。使用cons创建新列表。例如。

;; creates/updates binding *x* to point at the newly created list (test p 1)
(defparameter *c* (cons 'test 
                        (cons (car *a*) 
                              (cons (car *b*) 
                                    '()))))

cons是基元,但是CL还有其他几种创建列表的方法。例如。与功能list相同:

;; creates/updates binding *x* to point at the newly created list (test p 1)
(defparameter *c* (list 'test (car *a*) (car *b*)))

第二,使用quasiquote / unquote / unquote-splice使结构变得更复杂。

;; creates/updates binding *x* to point at the newly created list (test p 1)
(defparameter *c* `(test,(car *a*),(car *b*)))

;; more complex example
(defmacro my-let ((&rest bindings) &body body)
  `((lambda,(mapcar #'car bindings),@body),(mapcar #'cadr bindings)))

(macroexpand-1 '(my-let ((a 10) (b 20)) (print "hello") (+ (* a a) (* b b))))
; ==> ((lambda (a b) 
;       (print "hello") 
;       (+ (* a a) (* b b)))
;      (10 20))

请注意,这只是用conslistappend制成的相同结构的糖。可能已对其进行了优化,以减少对内存的使用,因此将共享结构。例如。过程中的 `(,x b c)将执行(cons x '(b c)),这意味着如果创建两个版本,则它们的cdr将是eq,并且应避免对这些部分进行突变。

,

要完成tfb的回答,您可以编写

class TestSpider:
name = "test"

def __init__(self,item,*args,**kwargs):
    self.item = item

def start_requests(self):
    yield scrapy.Request('https://example.com/',callback=self.parse)

def parse(self,response):
    
    // just fake response here!
       response.css('div li')
    yield self.item

这与

完全相同
`(test,(car a),(car b)

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 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时,该条件不起作用 <select id="xxx"> SELECT di.id, di.name, di.work_type, di.updated... <where> <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,添加如下 <property name="dynamic.classpath" value="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['font.sans-serif'] = ['SimHei'] # 能正确显示负号 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 -> 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("/hires") 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<String
使用vite构建项目报错 C:\Users\ychen\work>npm init @vitejs/app @vitejs/create-app is deprecated, use npm init vite instead C:\Users\ychen\AppData\Local\npm-