#lang Scheme
(define-struct storeItem (id des cost))
(define redApple (make-storeItem 0 "red delicious apple" 1.99))
(define chickenLeg (make-storeItem 1 "boned chicken" 2.99))
(define porkLoin (make-storeItem 2 "processed pork" 4.99))
(define milkD (make-storeItem 3 "vitamin d milk" 3.99))
(define baguetteBread (make-storeItem 4 "french bread" 0.99))
(define orangeJuice (make-storeItem 5 "fruit juice drink)" 1.49))
(define beanCan (make-storeItem 6 "beans in a can" 2.49))
(define masterList '(redApple chickenLeg porkLoin milkD baguetteBread
orangeJuice beanCan))
I am trying to get a list of objects from my structure and I am unsure of the correct syntax. Below is what I tired
(storeItem-des (car masterList)
I was expecting "red delicious apple"
But I get
storeItem-des: contract violation
expected: storeItem?
given: redApple
It seems like it is returning redApple
, which seems correct. Where am I going wrong?