From 97075f705350901f5ff46387f658ab459a4cd73f Mon Sep 17 00:00:00 2001
From: Richard Brooksby
Date: Fri, 7 Jun 2002 16:47:14 +0100
Subject: Updating cross references to design documents to html style, to go
 with master/design document tree.

Copied from Perforce
 Change: 29897
 ServerID: perforce.ravenbrook.com

---
 mps/code/protocol.h | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'mps/code/protocol.h')

diff --git a/mps/code/protocol.h b/mps/code/protocol.h
index a36b1055a8e..22fa6f21df7 100644
--- a/mps/code/protocol.h
+++ b/mps/code/protocol.h
@@ -25,7 +25,7 @@
 
 /* Macro to set the superclass field. This is not intended */
 /* to be used outside this file. This is a polymorphic macro */
-/* named as a function. See design.mps.protocol.introspect.c-lang */
+/* named as a function. See <design/protocol/#introspect.c-lang> */
 
 #define ProtocolClassSetSuperclassPoly(class, super) \
   (((ProtocolClass)(class))->superclass) = (ProtocolClass)(super)
@@ -120,7 +120,7 @@ typedef Bool (*ProtocolCoerceClassMethod)(ProtocolClass *coerceResult,
 
 
 typedef struct ProtocolClassStruct {
-  Sig sig;                               /* design.mps.sig */
+  Sig sig;                               /* <design/sig/> */
   ProtocolClass superclass;              /* the superclass */
   ProtocolCoerceInstMethod coerceInst;   /* coerce instance to super */
   ProtocolCoerceClassMethod coerceClass; /* coerce class to superclass */
@@ -128,7 +128,7 @@ typedef struct ProtocolClassStruct {
 
 
 typedef struct ProtocolInstStruct {
-  Sig sig;                      /* design.mps.sig */
+  Sig sig;                      /* <design/sig/> */
   ProtocolClass class;          /* the class  */
 } ProtocolInstStruct;
 
@@ -159,7 +159,7 @@ extern Bool ProtocolIsSubclass(ProtocolClass sub, ProtocolClass super);
 
 /* The following are macros because of the need to cast */
 /* subtypes of ProtocolClass. Nevertheless they are named */
-/* as functions. See design.mps.protocol.introspect.c-lang */
+/* as functions. See <design/protocol/#introspect.c-lang> */
 
 
 #define ProtocolClassSuperclassPoly(class) \
@@ -175,7 +175,7 @@ extern Bool ProtocolIsSubclass(ProtocolClass sub, ProtocolClass super);
  *
  * Returns the superclass, with type ProtocolClass. Clients will
  * probably wish to cast this. See
- * design.mps.protocol.int.static-superclass
+ * <design/protocol/#int.static-superclass>
  */
 #define SUPERCLASS(className)  \
   ProtocolClassSuperclassPoly(DERIVE_ENSURE(className)())
-- 
cgit v1.2.1