Re: Custom patterns

[poeck@informatik.uni-wuerzburg.de (Karsten Poeck)]

In article <Yh4qLCG00WB5A=J1BE@andrew.cmu.edu>, Andrew Newell Mickish
<am2q+@andrew.cmu.edu> wrote:

> 
> I am a new user of MCL, and I'm converting graphics software that was
> originally written for X windows (using the CLX lisp functions) to run
> on the Mac.
> 
....
Try

(defparameter *my-pattern*
	(make-record :pattern
	:b0 238
	...
	:b7 119))

and

(defun  mac-draw-arc (&rest args)
	(ccl:fill-arc *my-window* *my-pattern* 0 PI 10 10 80 80))


Karsten