Mercurial > hg > xemacs-beta
diff src/tooltalk.c @ 70:131b0175ea99 r20-0b30
Import from CVS: tag r20-0b30
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 09:02:59 +0200 |
| parents | e04119814345 |
| children | c7528f8e288d |
line wrap: on
line diff
--- a/src/tooltalk.c Mon Aug 13 09:00:04 2007 +0200 +++ b/src/tooltalk.c Mon Aug 13 09:02:59 2007 +0200 @@ -418,12 +418,12 @@ { switch (n) { - case TT_MODE_UNDEFINED: return Q_TT_MODE_UNDEFINED; - case TT_IN: return Q_TT_IN; - case TT_OUT: return Q_TT_OUT; - case TT_INOUT: return Q_TT_INOUT; - case TT_MODE_LAST: return Q_TT_MODE_LAST; - default: return Qnil; + case TT_MODE_UNDEFINED: return Q_TT_MODE_UNDEFINED; + case TT_IN: return Q_TT_IN; + case TT_OUT: return Q_TT_OUT; + case TT_INOUT: return Q_TT_INOUT; + case TT_MODE_LAST: return Q_TT_MODE_LAST; + default: return Qnil; } } @@ -432,12 +432,12 @@ { switch (n) { - case TT_SCOPE_NONE: return Q_TT_SCOPE_NONE; - case TT_SESSION: return Q_TT_SESSION; - case TT_FILE: return Q_TT_FILE; - case TT_BOTH: return Q_TT_BOTH; - case TT_FILE_IN_SESSION: return Q_TT_FILE_IN_SESSION; - default: return Qnil; + case TT_SCOPE_NONE: return Q_TT_SCOPE_NONE; + case TT_SESSION: return Q_TT_SESSION; + case TT_FILE: return Q_TT_FILE; + case TT_BOTH: return Q_TT_BOTH; + case TT_FILE_IN_SESSION: return Q_TT_FILE_IN_SESSION; + default: return Qnil; } } @@ -447,11 +447,11 @@ { switch (n) { - case TT_CLASS_UNDEFINED: return Q_TT_CLASS_UNDEFINED; - case TT_NOTICE: return Q_TT_NOTICE; - case TT_REQUEST: return Q_TT_REQUEST; - case TT_CLASS_LAST: return Q_TT_CLASS_LAST; - default: return Qnil; + case TT_CLASS_UNDEFINED: return Q_TT_CLASS_UNDEFINED; + case TT_NOTICE: return Q_TT_NOTICE; + case TT_REQUEST: return Q_TT_REQUEST; + case TT_CLASS_LAST: return Q_TT_CLASS_LAST; + default: return Qnil; } } @@ -465,11 +465,11 @@ { switch (n) { - case TT_CATEGORY_UNDEFINED: return Q_TT_CATEGORY_UNDEFINED; - case TT_OBSERVE: return Q_TT_OBSERVE; - case TT_HANDLE: return Q_TT_HANDLE; - case TT_CATEGORY_LAST: return Q_TT_CATEGORY_LAST; - default: return Qnil; + case TT_CATEGORY_UNDEFINED: return Q_TT_CATEGORY_UNDEFINED; + case TT_OBSERVE: return Q_TT_OBSERVE; + case TT_HANDLE: return Q_TT_HANDLE; + case TT_CATEGORY_LAST: return Q_TT_CATEGORY_LAST; + default: return Qnil; } } #endif /* 0 */ @@ -479,12 +479,12 @@ { switch (n) { - case TT_PROCEDURE: return Q_TT_PROCEDURE; - case TT_OBJECT: return Q_TT_OBJECT; - case TT_HANDLER: return Q_TT_HANDLER; - case TT_OTYPE: return Q_TT_OTYPE; - case TT_ADDRESS_LAST: return Q_TT_ADDRESS_LAST; - default: return Qnil; + case TT_PROCEDURE: return Q_TT_PROCEDURE; + case TT_OBJECT: return Q_TT_OBJECT; + case TT_HANDLER: return Q_TT_HANDLER; + case TT_OTYPE: return Q_TT_OTYPE; + case TT_ADDRESS_LAST: return Q_TT_ADDRESS_LAST; + default: return Qnil; } } @@ -493,15 +493,15 @@ { switch (n) { - case TT_CREATED: return Q_TT_CREATED; - case TT_SENT: return Q_TT_SENT; - case TT_HANDLED: return Q_TT_HANDLED; - case TT_FAILED: return Q_TT_FAILED; - case TT_QUEUED: return Q_TT_QUEUED; - case TT_STARTED: return Q_TT_STARTED; - case TT_REJECTED: return Q_TT_REJECTED; - case TT_STATE_LAST: return Q_TT_STATE_LAST; - default: return Qnil; + case TT_CREATED: return Q_TT_CREATED; + case TT_SENT: return Q_TT_SENT; + case TT_HANDLED: return Q_TT_HANDLED; + case TT_FAILED: return Q_TT_FAILED; + case TT_QUEUED: return Q_TT_QUEUED; + case TT_STARTED: return Q_TT_STARTED; + case TT_REJECTED: return Q_TT_REJECTED; + case TT_STATE_LAST: return Q_TT_STATE_LAST; + default: return Qnil; } } @@ -933,7 +933,7 @@ protocol you're using need to agree what types mean (if anything). Conventionally \"string\" is used for strings and \"int\" for 32 bit integers. Arguments can initialized by providing a value or with -`set-tooltalk-message-attribute'. The latter is necessary if you +`set-tooltalk-message-attribute'. The latter is neccessary if you want to initialize the argument with a string that can contain embedded nulls (use 'arg_bval). */ @@ -1132,7 +1132,7 @@ an integer argument (tt_pattern_iarg_add) added otherwise a string argument is added. At present there's no way to add a binary data argument. */ - (pattern, mode, vtype, value)) + (pattern, mode, vtype, value)) { Tt_pattern p = unbox_tooltalk_pattern (pattern); Tt_mode n;