diff --git a/contrib/sockets/test.lisp b/contrib/sockets/test.lisp
index 7ab03f5d4..2ea2c8933 100644
--- a/contrib/sockets/test.lisp
+++ b/contrib/sockets/test.lisp
@@ -1,3 +1,15 @@
+;; -*- Mode: Lisp; Syntax: Common-Lisp -*-
+;; $Id$
+
+;; This file is based on SBCL's SB-BSD-SOCKET module and has been
+;; heavily modified to work with ECL by Julian Stecklina.
+;; Port to Windows Sockets contributed by M. Goffioul.
+
+;; You may do whatever you want with this file. (PUBLIC DOMAIN)
+
+;; Trivial stuff is copied from SBCL's SB-BSD-SOCKETS, which is also
+;; in the public domain.
+
 (in-package :cl-user)
 
 (load "sys:sockets")