Pinboard-object flicker when moving

Hi LispWorkers,

I have a rectangle (subclass) object within a pinboard-layout which I move
horizontally using a scroll-bar. I get a flickering/flashing effect when I move
it. I've noticed a number of previous posts relating to similar situations, but
I'm not clear what the solution is, if any... Is with-atomic-redisplay meant to
work in such a situation? Having tried it at various places in my code I'd have
to conclude 'no'. 

I'm moving the rectangle from within the scroll-bar callback by setfing
pinboard-pane-position.

Any pointers, anyone?

Cheers,
Chris

Re: Pinboard-object flicker when moving

Unable to parse email body. Email id is 9360

Lispworks cannot inline functions with symbol-macrolet bindings?

Am I doing something wrong?

(in-package #:cl-user)

(macrolet ((tag ()
	     1
	     ))
  (symbol-macrolet ((tag (tag)))
    (declaim (inline in))
    (defun in ()
      (declare (optimize speed))
      tag)))

(defun using-in ()
  (in))

/tmp/lispworks-fail.lisp:12:1: warning:
TAG assumed special

and running (using-in)

The variable COMMON-LISP-USER::TAG is unbound.
   [Condition of type UNBOUND-VARIABLE]