I was hoping someone could look at this and help me debug it.

I'm getting:

  (FOREIGN-ALLOC :POINTER :INITIAL-ELEMENT (NULL-POINTER))
is not of type
  SB-SYS:SYSTEM-AREA-POINTER. when I run it.



(foreign-array-alloc #2A((

			  (foreign-alloc :pointer :initial-element (null-pointer)) 
			  (foreign-alloc :pointer :initial-element (null-pointer))) 
			 ((foreign-alloc :pointer :initial-element (null-pointer)) 
			  (foreign-alloc :pointer :initial-element (null-pointer))) 
			
 ((foreign-alloc :pointer :initial-element (null-pointer)) 
			  (foreign-alloc :pointer :initial-element (null-pointer))) 
			 ((foreign-alloc :pointer :initial-element (null-pointer)) 
			  (foreign-alloc :pointer :initial-element (null-pointer)))) '(:array :pointer 4 2))