Use :fast-unsafe-source-file in the ASD file instead of setting
the compiler policy at the top of each Lisp source file.

Add some Allegro-specific code for setting the socket mode.
Choose server ports more carefully.
Name change: pick-unused-port ==> unused-port.