diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2015-06-16 07:39:37 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2015-06-16 07:39:37 (GMT) |
| commit | 8cc3270216737bf8019477ed1cf0ed58aeb58559 (patch) | |
| tree | 73300d1767b4bec2cba36fc2fd441be977544968 /unix/tclUnixChan.c | |
| parent | 0b33f4fe3805f12f22c717b69fda283322391613 (diff) | |
| parent | b95f925867aa646255dbd2c4067c8c0b3ddbda96 (diff) | |
| download | tcl-8cc3270216737bf8019477ed1cf0ed58aeb58559.zip tcl-8cc3270216737bf8019477ed1cf0ed58aeb58559.tar.gz tcl-8cc3270216737bf8019477ed1cf0ed58aeb58559.tar.bz2 | |
Fix [e770d92d76]: Add support for higher baud rates in Tcl
Diffstat (limited to 'unix/tclUnixChan.c')
| -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 89c9a27..a0d9811 100644 --- a/unix/tclUnixChan.c +++ b/unix/tclUnixChan.c @@ -1153,6 +1153,39 @@ static CONST struct {int baud; unsigned long 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} }; |