- (funcall (intern "C-CONSTANTS-EXTRACT" (find-package "BSD-SOCKETS-SYSTEM"))
- filename tmp-c-source :bsd-sockets-internal)
+ (funcall (intern "C-CONSTANTS-EXTRACT"
+ (find-package "SB-BSD-SOCKETS-SYSTEM"))
+ filename tmp-c-source :sb-bsd-sockets-internal)