Log Message:
-----------
Improved error messages for formulas returning infinity
Modified Files:
--------------
pg/lib:
Value.pm
Revision Data
-------------
Index: Value.pm
===================================================================
RCS file: /webwork/cvs/system/pg/lib/Value.pm,v
retrieving revision 1.46
retrieving revision 1.47
diff -Llib/Value.pm -Llib/Value.pm -u -r1.46 -r1.47
--- lib/Value.pm
+++ lib/Value.pm
@@ -220,6 +220,7 @@
$type .= ' of '.$ltype.'s';
}
}
+ return 'an Infinity' if $type eq 'String' && $value->{isInfinite};
return 'a Word' if $type eq 'String';
return 'a Complex Number' if $value->isComplex;
return 'an '.$type if $type =~ m/^[aeio]/i;
|
