Codigo para GNU Common Lisp (gcl) de SUN