diff options
Diffstat (limited to 'mps/code/protocol.h')
| -rw-r--r-- | mps/code/protocol.h | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/mps/code/protocol.h b/mps/code/protocol.h index 81f9b9bf511..4c70738e8f8 100644 --- a/mps/code/protocol.h +++ b/mps/code/protocol.h | |||
| @@ -102,20 +102,22 @@ typedef struct ProtocolInstStruct *ProtocolInst; | |||
| 102 | * If "pro" is an instance of "interface", then returns TRUE | 102 | * If "pro" is an instance of "interface", then returns TRUE |
| 103 | * and sets coerceResult to point directly to the part of "pro" | 103 | * and sets coerceResult to point directly to the part of "pro" |
| 104 | * which contains the slots for "interface" | 104 | * which contains the slots for "interface" |
| 105 | * RHSK 2006-04-05 s/interface/interfaceIn/: job000605, suspect msvc bug. | ||
| 105 | */ | 106 | */ |
| 106 | typedef Bool (*ProtocolCoerceInstMethod)(ProtocolInst *coerceResult, | 107 | typedef Bool (*ProtocolCoerceInstMethod)(ProtocolInst *coerceResult, |
| 107 | ProtocolInst pro, | 108 | ProtocolInst pro, |
| 108 | ProtocolClass interface); | 109 | ProtocolClass interfaceIn); |
| 109 | 110 | ||
| 110 | /* ProtocolCoerceClassMethod -- coerce "proClass" to an "interface" class | 111 | /* ProtocolCoerceClassMethod -- coerce "proClass" to an "interface" class |
| 111 | * | 112 | * |
| 112 | * If "proClass" is a subclass of "interface", then returns TRUE | 113 | * If "proClass" is a subclass of "interface", then returns TRUE |
| 113 | * and sets coerceResult to point directly to the part of | 114 | * and sets coerceResult to point directly to the part of |
| 114 | * "proClass" which contains the slots for "interface". | 115 | * "proClass" which contains the slots for "interface". |
| 116 | * RHSK 2006-04-05 s/interface/interfaceIn/: job000605, suspect msvc bug. | ||
| 115 | */ | 117 | */ |
| 116 | typedef Bool (*ProtocolCoerceClassMethod)(ProtocolClass *coerceResult, | 118 | typedef Bool (*ProtocolCoerceClassMethod)(ProtocolClass *coerceResult, |
| 117 | ProtocolClass proClass, | 119 | ProtocolClass proClass, |
| 118 | ProtocolClass interface); | 120 | ProtocolClass interfaceIn); |
| 119 | 121 | ||
| 120 | 122 | ||
| 121 | 123 | ||