Graphics Port Utility functions for LispWorks