Corretto CHECK nella read_item dei TList_field

git-svn-id: svn://10.65.10.50/trunk@2953 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1996-06-03 11:58:55 +00:00
parent 4fc8fb6f0a
commit 7efeae441a

View File

@ -3424,9 +3424,9 @@ void TList_field::read_item(TScanner& scanner)
const char* v = ts.get();
_values.add(v);
CHECKS(strlen(v) <= (word)_ctl_data._width, "List item is too long:", v);
CHECKS(v == NULL || strlen(v) <= (word)_ctl_data._width, "List item is too long:", v);
ts = "";
ts.cut(0);
while (scanner.popkey() == "ME")
ts.add(scanner.line().strip_spaces());
scanner.push();