2014年12月_炼气散人

12月 11月 10月 09月 08月 07月 06月 05月 04月 03月 02月 01月

原创 newLISP序列化

newLISP序列化主要是指list表达式如何转换成string，存储在文件或者数据库中。然后读取并转换成list表达式。先看简单的list转换成string(setf a '(1 2 3 4))(1 2 3 4)> (string a)"(1 2 3 4)"string转换成list(list? (eval-string (string "'" b)))true这行代码需要说明一下。需要使用ev

2014-12-31 18:12:07 2036

原创 newLISP symbol

初始化symbolsetsyntax: (set sym-1 exp-1 [sym-2 exp-2 ... ])下面是例子：> (set 'mysymbol "ebd")"ebd"> (upper-case mysymbol)"EBD"上面第一句设置了一个symbol, 值为字符串。第二句使用该symbol。注意此时无需单引号。注意：1. 这里set定义了全局的symbol, 不过只能在当

2014-12-21 12:46:35 2194

原创 newLISP 多核编程

newLISP实现了Cilk API, 可以将多个同时运行的进程执行在多处理器或者多核的CPU架构上，已达到并行节省运行时间的目的。使用spawn和sync函数可以很快的实现。下面是来自newLISP官方文档的例子：#!/usr/bin/newlisp; calculate primes in a range(define (primes from to) (local (plist)

2014-12-20 13:06:00 3077

原创用find/find-all match方式查找list元素

查找list中的一个子list假定数据库里面有若干行记录，newlisp mysql模块返回结果是用一个list表示这个若干行记录，然后每个元素都是一个list，里面包含一行记录，每行记录list里面有包含了若干list,每个list都有两个元素：字段名和字段值。现在我们可以用find方式来进行模式查找> (find (list (list "issue_id" 1773) '*) '((("is

2014-12-17 00:29:36 4165

原创 redmine 自定义字段mysql表结构

redmine可以创建自定义字段，我经常用它来满足不同的管理需求，现在来解读一下，看看这些自定义字段是如何存在mysql表中的。表issues用来存放issue的标准字段。mysql> describe issues;+----------------------+--------------+------+-----+---------+----------------+| Field

2014-12-15 23:50:57 5885

原创 emacs 中使用git diff命令行

在shell中运行git命令，经常会看到如下警告信息： terminal is not fully functional其实很简单，配置一下即可。git-config --global core.pager ""

2014-12-14 22:56:37 3186

原创 newLISP数据引用

无法返回引用数据传递包括两种，返回值和参数。很可惜，newlisp的返回值只进行值拷贝，也就是返回副本，并没有方法返回引用。那么看看参数吧，通过参数有两种方法传递引用，一种是通过使用单引号，比如：单引号symbol传递参数引用(define (change-list aList) (push 999 (eval aList)))(set 'data '(1 2 3 4 5)); note

2014-12-14 19:53:56 2935

原创 newLISP FOOP 对象模型

对象之间的关系对象可以包含对象，就像一般面向对象的对象树一样。在lisp中，其实很简单, 因为对象就是list, 对象包含对象也就是list里面包含list，此嵌套关系可以有很多层。下面这个例子同样来自manual; create classes(new Class 'Person)(new Class 'Address)(new Class 'City)(new Class 'Stree

2014-12-14 17:24:28 2242

原创 mu4e 查看邮件图片

看图片不太灵光，经常需要单独打开图片文件，还是决定改进一下。用imagemagick吧。首先下载最新源代码，解压后，编译安装。之后编译emacs 24源代码，./configure执行后注意观察是否使用了imagemagick，yes就没有问题。然后.emacs.d/init.el文件中添加：;; use imagemagick, if available(when (fboundp 'imag

2014-12-12 18:43:57 2686

原创 append构建动态函数

append我常用于连接两个string或者list，其实还可以这样用，将两个list连接成一个lambda表达式：> (append (lambda (x)) '((add x 1)))(lambda (x) (add x 1))append的第一个参数是(lambda (x)) 一个List，有两个元素，第二个参数也是一个list，子元素也是一个list拼接后就是变成了一个完整的lambda

2014-12-10 23:57:21 3178

原创用map对一个或者多个list元素操作

map是一个非常好用的功能，先举个简单的例子两个list元素的操作(map + '(1 2 3) '(50 60 70)) → (51 62 73)两个list元素的if操作(map if '(true nil true nil true) '(1 2 3 4 5) '(6 7 8 9 10))→ '(1 7 3 9 5)这个有点意思，相当与用一堆bool值来确定是从第一个list中挑选元素，

2014-12-10 22:16:55 4632

原创 Ubuntu使用exchange日历

答案是用DavMail,将exchange日历变成CalDav标准，然后可以考虑用Eamcs org-caldav. 但是似乎有bug，无法和DavMail对接，我没有做过测试，是在github上看到一个issue, 作者大半年了都没有回复。让我没有信心使用它。https://github.com/dengste/org-caldav/issues/40所以另一个方案是使用thunderbird，

2014-12-06 16:00:39 4015

原创 conkeror 常用快捷键

mu4e启动conkeror首先在mu4e中如果想打开一个链接，用Alt - Enter或者写为 M- Ret, 此时默认conkeror浏览器会启动，图标是firefox。显示快捷键列表C-h b输入一个键，然后解释其功能C-h k打开向导C-h t页面管理关闭当前缓冲q在新buffer打开新页面C-x C-f在新窗口打开新页面C-u C-x C-f切换bufferC-x b 会弹出一个mini

2014-12-04 23:02:55 2706

原创 ubuntu 15.10 编译安装conkeror

conkeror几年前我用过，还是一个不错的浏览器，这次因为笔记本只支持Ubuntu 13.10, 而不支持更新版本，就尝试着在Ubuntu 13.10上安装最新conkeror，但是没想到居然没有安装源。于是就编译吧，当然还是要首先clone到源代码：git clone git://repo.or.cz/conkeror.git然后根据官方文档的提示：To build your own Conk

2014-12-04 22:42:59 2682

原创 Eamcs 使用eww浏览器

eww浏览器是emacs 24.4内置的一个新浏览器，渲染HTML功能较好。在使用mu4e阅读邮件时也可以使用eww的shr2渲染器。http://www.djcbsoftware.nl/code/mu/mu4e/Displaying-rich_002dtext-messages.html#Displaying-rich_002dtext-messages首先下载emacs 24.4的源代码，然后

2014-12-03 18:01:34 4196