Add configuring of the grabbed pointer

I put variables in `primitives.lisp` because `*grab-pointer-count*` was already there.  If it's not a suitable place, i can move them.