guess-types-for-data-table confused by a string followed by a string containing integer.

[Yehouda]

The following form:

(let ((dt (make-instance 'DATA-TABLE:data-table :rows '(( "string") ("3"))))) 
  (data-table:coerce-data-table-of-strings-to-types dt)
  (data-table:column-types dt))

returns (DOUBLE-FLOAT) rather than (STRING) or (INTEGER). That is the result of the way guess-types-for-data-table behaves, which seems to be wrong.

The last two assertions in the test data-table-value-overlaying fail as a result. If what guess-types-for-data-table is doing is the right thing, then the test needs to be fixed.