Re: some queries
[email protected] Mon, 5 Aug 2002 23:37:36 -0400
| Newsgroups | gmane.lisp.garnet.user |
|---|---|
| Message-ID | <[email protected]> |
Hello > > Hello Everyone, > > I am a graduate student in the Computer Science Dept at Penn State. I have > been working on a project involving Garnet since the past 3 months and > have a couple of questions. Regarding question 2: > 2. Say I am creating a line by the code: > Instead, I need to use something like this: > > (setf a 'abc) > > (create-instance a opal:line > (:x1 x1) > (:y1 y1) > (:x2 x2) > (:y2 y2) > (:line-style opal:blue-line)) > > When I try to do this, Garnet kind of skips over the create-instance and > does not even give an error. Please let me know what I am doing wrong or > how should I go about doing this. There's nothing inherently wrong with the code above - some more context would help the diagnosis (where exactly does the problem come in, what does it look like, etc.). I have tried out the following code and it works just fine, displaying a window with a blue 'X' in the middle of it: ;;;;;;;;;;;;;;;; (create-instance 'win inter:interactor-window) (create-instance 'agg opal:aggregate) (s-value win :aggregate agg) (setf a 'abc) (setf b 'efg) (create-instance a opal:line (:x1 130) (:y1 90) (:x2 230) (:y2 190) (:line-style opal:blue-line)) (create-instance b opal:line (:x1 130) (:y1 190) (:x2 230) (:y2 90) (:line-style opal:blue-line)) (opal:add-components agg (eval a) (eval b)) (opal:update win) ;;;;;;;;;;;;;;; Is that what you want? -Isaac