如何批量删除lisp中的注释

xvjiex · 发表于 2020-12-30 13:17:26

您需要登录才可以下载或查看，没有账号？立即注册

×

在网上找到一些源码，里面有好多无用的注释影响阅读，如何能批量删除这些注释？
例如：以下《;1541》《;1547》等。

Lisphk · 发表于 2020-12-30 15:11:40

找个支持正则表达式的编辑器，EDITPLUS，
替换成空

xvjiex · 发表于 2020-12-30 16:06:02

Lisphk 发表于 2020-12-30 15:11
找个支持正则表达式的编辑器，EDITPLUS，
替换成空

确实是个好方法。不知能否用lisp来实现批量删除注释。

Lisphk · 发表于 2020-12-30 16:21:32

xvjiex 发表于 2020-12-30 16:06
确实是个好方法。不知能否用lisp来实现批量删除注释。

你做事情的目的是什么尼？哪个高效用哪个

如果用LISP
你去看下字符串万能替换，用里面的正则表达式替换
对话框文字万能替换工具（第二版）-加入正则替换

231 个回复 - 8769 次查看

加入了“正则表达式”查找替换功能，真正的“万能”替换。 **** 本内容被作者隐藏 **** 正则替换的几个例子： 1、字首的字母替换成"" 2、字母和数字之间添加“-” 3、字母变2个，后添加 “--” ...

2018-5-18 23:15 - Lispboy - 每日插件

marting · 发表于 2020-12-30 16:32:43

你不是希望把搜集的LISP代码处理吗，那你在CAD里面做什么，用编辑器批量自动处理就好了

下面是EDITPLUS编辑器，
搜索冒号到行尾的所有字符，替换成空

注释的正则表达式是： ;.*$

搜狗截图20201230162936.png

xvjiex · 发表于 2020-12-30 16:37:39

Lisphk 发表于 2020-12-30 16:21
你做事情的目的是什么尼？哪个高效用哪个

如果用LISP

非常感谢，EDITPLUS应该是非常高效的。能否用简单的lisp实现，不用正则？看看lisp的简单用法。

marting · 发表于 2020-12-30 16:47:59

xvjiex 发表于 2020-12-30 16:37
非常感谢，EDITPLUS应该是非常高效的。能否用简单的lisp实现，不用正则？看看lisp的简单用法。

那你去看看上面LISPHK给你的帖子，万能替换，去看看里面的源代码，用通用函数库的字符串正则查找替换去做

账号		自动登录	找回密码
密码			立即注册

[求助] 如何批量删除lisp中的注释