From 0dbcb1a9122867eab5e75a17482142ba277871ee Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Fri, 11 May 2018 11:52:56 +0200
Subject: [PATCH] Increase timeout for building Macsyma.

---
 build/build.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/build/build.tcl b/build/build.tcl
index 912cf19f..0a44f60e 100644
--- a/build/build.tcl
+++ b/build/build.tcl
@@ -88,7 +88,7 @@ proc build_macsyma_portion {} {
     type "(mapcan #'(lambda (x) (cond ((not (memq x\r"
     type "'(SETS TRANSS MTREE TRHOOK EDLM)\r"
     type ")) (doit x)))) (append todo todoi))"
-    expect {
+    expect -timeout 1000 {
 	";BKPT" {
 	    type "(quit)"
 	}