Emacs Lisp编程实践——interactive的几种基本用法

在Emacs Lisp中,一个函数如果被定义为interactive的,那么它就可以通过M-xexecute-extened-command)进行调用,这样的函数也称为命令command)。

简而言之,interactive提供了一种让使用者可以交互式输入参数、调用函数的途径,本文就来探讨一下interactive的常见用法。

约定

本文用M-x hello RET表示使用execute-extened-command函数执行一个名为hellointeractive函数并按回车键,用=>表示输出调用结果,用C-u表示输入universal argument(前缀参数)。

下面是一个完整的例子:

C-u 7 M-x hello RET => hello, world!

表示先输入一个前缀参数7,然后执行了一个名为hello的函数,然后按回车键,得到输出结果为hello, world!

用法1:最简单的用法

(defun hello ()
  "Just say hello."
  (interactive)
  (message "Hello!"))

执行函数helloM-x hello RET => Hello!

用法2:传入一个交互式输入的参数

(defun hello2 (name)
  "Say hello to a person."
  (interactive "sPlease input person name: ")
  (message "Hello, %s!" name))

这个函数支持在minibuffer交互式输入一个参数,执行函数hello2M-x hello2 RET John RET => Hello, John!

用法3:传入多个交互式输入的参数

(defun hello3 (name age country)
  "Say hello to a person with more info."
  (interactive "sPlease input name: \nnage: \nscountry: ")
  (message "Hello, %s! age is: %d, country is: %s" name age country))

执行函数hello3M-x hello3 RET Tom RET 20 RET USA RET => Hello, Tom! age is: 20, country is: USA

用法4:传入region的起、始位置

(defun hello-use-region (start end)
  "Say hello, with output region info."
  (interactive "r")
  (message "Hello! region start: %d, end: %d" start end))

这种用法可以用于写一个操作选中的文本区域(region)的函数。

先选中一个区域,然后执行hello-use-region函数:M-x hello-use-region RET => Hello! region start: 1, end: 10

用法5:传入一个list参数

(defun hello-use-list-input (num1 num2 num3)
  "Say hello, with input list."
  (interactive
   (let ((nums (list 1 2 3)))
     ;; here cannot use num1, num2 or num3 directly
     (mapcar '1+ nums)))
  (message "Hello! 1+1=%d, 2+1=%d, 3+1=%d" num1 num2 num3))

这种用法要注意的是:在interactive语句块内部不能直接使用函数的入参(在这个例子中就是num1, num2和num3),否则会报错。

执行hello-use-list-input函数:M-x hello-use-list-input RET => Hello! 1+1=2, 2+1=3, 3+1=4

用法6:传入一个前缀参数

(defun hello-with-universal-arg (arg)
  "Say hello with input universal arg."
  (interactive "p")
  (message "Hello! universal arg = %s" arg))

前缀参数又叫做universal argument,用C-u快捷键输入,可以用于方便地给一个函数传入一个整形参数(可以为整数也可以为负数,如果不传,默认值是1)。

执行hello-with-universal-arg函数,不传入前缀参数:M-x hello-with-universal-arg RET => Hello! universal arg = 1

传入前缀参数:C-u -77 M-x hello-with-universal-arg RET => Hello! universal arg = -77

总结

本文总结了interactive的六种常见用法,可以满足大部分场景的需求,还有更多的用法可以通过C-h f interactive来查看文档。

©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 162,825评论 4 377
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 68,887评论 2 308
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 112,425评论 0 255
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 44,801评论 0 224
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 53,252评论 3 299
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 41,089评论 1 226
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 32,216评论 2 322
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 31,005评论 0 215
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 34,747评论 1 250
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 30,883评论 2 255
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 32,354评论 1 265
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 28,694评论 3 265
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 33,406评论 3 246
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 26,222评论 0 9
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 26,996评论 0 201
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 36,242评论 2 287
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 36,017评论 2 281

推荐阅读更多精彩内容