結(jié)構(gòu)是用戶定義的數(shù)據(jù)類型,它讓用戶可以合并不同種類的數(shù)據(jù)項。
結(jié)構(gòu)被用于表示記錄。假設(shè)要跟蹤圖書館中的書籍??赡芟M櫫私饷勘緯囊韵聦傩裕?/p>
標題 - Title
作者 - Author
科目 - Subject
書籍編號 - Book ID
LISP的defstruct宏允許定義一個抽象的記錄結(jié)構(gòu)。defstruct語句定義了一個新的數(shù)據(jù)類型,項目結(jié)構(gòu)中不止一個成員。
討論defstruct宏的格式,編寫本書的結(jié)構(gòu)的定義??梢远x本書的結(jié)構(gòu)為:
(defstruct book title author subject book-id )
請注意:
上述聲明創(chuàng)建一個本書結(jié)構(gòu)有四個命名組件。因此,創(chuàng)建的每一個本書將是這個結(jié)構(gòu)的對象。
它定義了一個名為book-title,book-subject,book-book-id的書籍,這將需要一個參數(shù),書的結(jié)構(gòu),并且將返回的字段標題,作者,主題和本書的book-book-id對象。這些函數(shù)被稱為接入功能。
符號書成為一個數(shù)據(jù)類型,它可以使用typep謂詞檢查。
也將命名為book-p隱函數(shù),這是一個謂詞,將為true,如果它的參數(shù)是本、書,則返回false。
另一個名為make-book 隱函數(shù)將被創(chuàng)建,這是一種構(gòu)造方法,其中,當被調(diào)用時,將創(chuàng)建一個數(shù)據(jù)結(jié)構(gòu)具有四個組件,適于與所述接入功能的使用。
#S語法指的是一個結(jié)構(gòu),可以用它來讀取或打印一本書的實例
copy-book書本參數(shù)還定義了隱函數(shù)。這需要書的對象,并創(chuàng)建另一個書的對象,這是第一個副本。調(diào)用此函數(shù)復(fù)印機功能。
可以使用setf改變書籍的組成結(jié)構(gòu),例如
(setf (book-book-id book3) 100)
示例
創(chuàng)建一個名為main.lisp一個新的源代碼文件,并在其中輸入如下代碼:
(defstruct book title author subject book-id ) ( setq book1 (make-book :title "C Programming" :author "Nuha Ali" :subject "C-Programming Tutorial" :book-id "478")) ( setq book2 (make-book :title "Telecom Billing" :author "Zara Ali" :subject "C-Programming Tutorial" :book-id "501")) (write book1) (terpri) (write book2) (setq book3( copy-book book1)) (setf (book-book-id book3) 100) (terpri) (write book3)
當執(zhí)行代碼,它返回以下結(jié)果:
#S(BOOK :TITLE "C Programming" :AUTHOR "Nuha Ali" :SUBJECT "C-Programming Tutorial" :BOOK-ID "478") #S(BOOK :TITLE "Telecom Billing" :AUTHOR "Zara Ali" :SUBJECT "C-Programming Tutorial" :BOOK-ID "501") #S(BOOK :TITLE "C Programming" :AUTHOR "Nuha Ali" :SUBJECT "C-Programming Tutorial" :BOOK-ID