Add some tests for old bugs from bugs/dan

Author: d-torrance

M2/Macaulay2/tests/normal/factory.m2

@@ -22,3 +22,8 @@ gcd(p,q)
 assert( gcd(p,q) == d )
 -- test deferred, trying to get it to work
 -- factor p						    -- not implemented yet
+
+-- used to crash (M2/bugs/dan/1-factory-bug)
+R = ZZ/2[x,y,z,u,v]
+I = ideal(z^2 + x*y*z + x^2*y + x*y^2, u^2 + x*u + x, v^2 + y*v + y)
+assert(I == radical I)

M2/Macaulay2/tests/normal/threads.m2

@@ -17,6 +17,8 @@ assert( 4 === taskResult t )
 t = schedule ( x -> x+2, 2 )
 assert( 4 === taskResult t )
 
+assert(hash schedule(() -> null) != hash schedule(() -> null))
+
 -- check whether thread local variables have separate values in separate threads
 threadVariable aaa
 assert( aaa === null )

M2/Macaulay2/tests/normal/unicode.m2

@@ -9,3 +9,6 @@ assert(v·w == 11)
 assert try getSymbol "⟎⟎" then false else true
 
 assert((a⇒b) === (a => b))
+
+-- used to raise recursion error (M2/bugs/dan/1-recursion-in-printing)
+assert(vector vector {1} == vector(ZZ, 1))