--- a/ecl.ent
+++ b/ecl.ent
@@ -39,3 +39,4 @@
 <!ENTITY clhs "http://www.lispworks.com/documentation/HyperSpec/Body/">
 <!ENTITY cygwin "<ulink url='http://www.cygwin.com/'><application>Cygwin</application></ulink>">
 <!ENTITY mingw "<ulink url='http://mingw.sourceforge.net/'><application>Mingw</application></ulink>">
+<!ENTITY OCL "<link linkend='ansi.OCL'>[Only in Common Lisp]</link>">