| version 1.2, 2000/01/16 07:55:48 |
version 1.3, 2000/02/24 12:33:48 |
|
|
| /* $OpenXM$ */ |
/* $OpenXM: OpenXM/src/kan96xx/plugin/sm1Socket.hh,v 1.2 2000/01/16 07:55:48 takayama Exp $ */ |
| else if (strcmp(key,"sm1.socket") == 0) { |
else if (strcmp(key,"sm1.socket") == 0) { |
| if (size != 3) { |
if (size != 3) { |
| errorKan1("%s\n","[(sm1.socket) (key for sm1.socket) [ args ]] extension"); |
errorKan1("%s\n","[(sm1.socket) (key for sm1.socket) [ args ]] extension"); |
| } |
} |
| |
if (SecureMode) errorKan1("%s\n","Security violation for sm1.socket."); |
| obj1 = getoa(obj,1); |
obj1 = getoa(obj,1); |
| obj2 = getoa(obj,2); |
obj2 = getoa(obj,2); |
| if (obj1.tag != Sdollar) { |
if (obj1.tag != Sdollar) { |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to sm1Socket.hh CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / kan96xx / plugin