在方案中定義一個字段的結構體

Question

我正在爲一個類進行家庭作業分配。問題陳述說，使用數據定義：

(define-struct diff-exp exprs) 
(define-struct mult-exp exprs) 
;; An Expr is one of 
;; -- Number 
;; -- (make-diff-exp (cons Expr LOExpr)) 
;; -- (make-mult-exp (cons Expr LOExpr)) 
;; Interpretation: a diff-exp represents a difference, 
;; and a mult-exp represents a multiplication. 
;; A List of Exprs (LOExpr) is one of 
;; -- empty 
;; -- (cons Expr LOExpr) 

然而，當我剛剛在源，計劃博士（中級學員語言）說：

define-struct: expected a sequence of field names after the structure type name in `define-struct', but found something else 

有什麼事我在這裏失蹤還是我的老師給我一個無效的數據定義？

Answer 1

像上面評論中提到的Anon，define-struct需要一個字段列表;如果你只需要一個，那麼使用一個元素的列表。示例代碼：

(define-struct diff-exp (exprs)) 

(let ((myexpr (make-diff-exp (list foo bar)))) 
    (diff-exp-exprs myexpr)) 

您可以通過define-structin the PLT Scheme documentation許多各式各樣的功能步槍。