LISP - 字元

在LISP中,字元被表示為字元類型的數據對象。

可以記#前字元本身之前的字元的對象。例如,#一個表示字元a。

空格和其他特殊字元可以通過#前面的字元的名稱前表示。例如,#空格代表空格字元。

下麵的例子演示了這一點:

示例

創建一個名為main.lisp一個新的源代碼檔,並在其中輸入如下代碼:

(write 'a)
(terpri)
(write #a)
(terpri)
(write-char #a)
(terpri)
(write-char 'a)

當執行以上代碼,它返回以下結果:

A
#a
a
*** - WRITE-CHAR: argument A is not a character

特殊字元

Common Lisp允許使用以下特殊字元在代碼。他們被稱為半標準字元。

  • #Backspace

  • #Tab

  • #Linefeed

  • #Page

  • #Return

  • #Rubout

字元比較函數

數字比較函數和運算符,如,< 和 >上字元不工作。 Common Lisp提供了另外兩組的功能,在代碼中比較字元。

一組是區分大小寫的,而另一個不區分大小寫。

下表提供的功能:

Case Sensitive Functions Case-insensitive Functions 描述
char= char-equal 檢查如果運算元的值都相等與否,如果是的話那麼條件為真。
char/= char-not-equal 檢查如果運算元的值都不同,或沒有,如果值不相等,則條件為真。
char< char-lessp 檢查如果運算元的值單調遞減。
char> char-greaterp 檢查如果運算元的值單調遞增。
char<= char-not-greaterp 如有左運算元的值大於或等於下一個右運算元的值,如果是則條件為真檢查。
char>= char-not-lessp 如有左運算元的值小於或等於其右運算元的值,如果是,則條件為真檢查。

示例

創建一個名為main.lisp一個新的源代碼檔,並在其中輸入如下代碼:

; case-sensitive comparison
(write (char= #a #))
(terpri)
(write (char= #a #a))
(terpri)
(write (char= #a #A))
(terpri)
;case-insensitive comparision
(write (char-equal #a #A))
(terpri)
(write (char-equal #a #))
(terpri)
(write (char-lessp #a # #c))
(terpri)
(write (char-greaterp #a # #c))

當執行以上代碼,它返回以下結果:

NIL
T
NIL
T
NIL
T
NIL

上一篇: LISP - 數字 下一篇: LISP - 數組