-(sb!alien:def-alien-routine ("os_allocate" allocate-system-memory)
- system-area-pointer
- (bytes sb!c-call:unsigned-long))
+(sb!alien:define-alien-routine ("os_allocate" allocate-system-memory)
+ system-area-pointer
+ (bytes sb!alien:unsigned-long))