michiakig · December 12, 2015 09:29
diff --git a/gistfile1.txt b/gistfile1.txt
 - printTree t;
             a
            / \
         b       c
        / \     / \
       d   e   x   y
      / \            
     q   w
 val it = () : unit

 (*
 should be
             a
            / \
           /   \
          /     \
         b       c
        / \     / \
       d   e   x   y
      / \            
     q   w

 *)
	- printTree t;
	a
	/ \
	b c
	/ \ / \
	d e x y
	/ \
	q w
	val it = () : unit

	(*
	should be
	a
	/ \
	/ \
	/ \
	b c
	/ \ / \
	d e x y
	/ \
	q w

	*)