summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2015-06-16 07:39:37 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2015-06-16 07:39:37 (GMT)
commitdda7ee5603bfed26364783231cedbed74a4fb600 (patch)
tree73300d1767b4bec2cba36fc2fd441be977544968
parentf5b6f91e7a334f96572f303116009f8d1304bed4 (diff)
parent2eafca4f84dee0db9ffa749bca6218c6bf1c3e21 (diff)
downloadtcl-dda7ee5603bfed26364783231cedbed74a4fb600.zip
tcl-dda7ee5603bfed26364783231cedbed74a4fb600.tar.gz
tcl-dda7ee5603bfed26364783231cedbed74a4fb600.tar.bz2
Fix [e770d92d76]: Add support for higher baud rates in Tcl
-rw-r--r--unix/tclUnixChan.c33
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}
};