diff options
author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2015-06-16 08:41:38 (GMT) |
---|---|---|
committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2015-06-16 08:41:38 (GMT) |
commit | 28b233681183a12f2bb6ac87be1723e11cc23c2a (patch) | |
tree | 35bf8788eb041d04584b406a457a32470f03e98c | |
parent | cb3482dd66b5a46cd90994da7aba05600af21db2 (diff) | |
parent | 8cc3270216737bf8019477ed1cf0ed58aeb58559 (diff) | |
download | tcl-28b233681183a12f2bb6ac87be1723e11cc23c2a.zip tcl-28b233681183a12f2bb6ac87be1723e11cc23c2a.tar.gz tcl-28b233681183a12f2bb6ac87be1723e11cc23c2a.tar.bz2 |
Fix [e770d92d76]: Add support for higher baud rates in Tcl
-rw-r--r-- | unix/tclUnixChan.c | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/unix/tclUnixChan.c b/unix/tclUnixChan.c index a1fe090..b4b2739 100644 --- a/unix/tclUnixChan.c +++ b/unix/tclUnixChan.c @@ -988,6 +988,39 @@ static const struct {int baud; speed_t speed;} speeds[] = { #ifdef B460800 {460800, B460800}, #endif +#ifdef B500000 + {500000, B500000}, +#endif +#ifdef B576000 + {576000, B576000}, +#endif +#ifdef B921600 + {921600, B921600}, +#endif +#ifdef B1000000 + {1000000, B1000000}, +#endif +#ifdef B1152000 + {1152000, B1152000}, +#endif +#ifdef B1500000 + {1500000,B1500000}, +#endif +#ifdef B2000000 + {2000000, B2000000}, +#endif +#ifdef B2500000 + {2500000,B2500000}, +#endif +#ifdef B3000000 + {3000000,B3000000}, +#endif +#ifdef B3500000 + {3500000,B3500000}, +#endif +#ifdef B4000000 + {4000000,B4000000}, +#endif {-1, 0} }; |