From: keie Date: Thu, 31 Jan 1985 14:03:56 +0000 (+0000) Subject: Zero is deleted as a possible argument to LOI and STI. X-Git-Tag: release-5-5~5687 X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=f586956618b1c23d088cd9b8f115393e4ddaebdf;p=ack.git Zero is deleted as a possible argument to LOI and STI. Allowing that was an oversight. --- diff --git a/doc/em/em.i b/doc/em/em.i index 560c4bfd5..23d821c0d 100644 --- a/doc/em/em.i +++ b/doc/em/em.i @@ -240,7 +240,7 @@ begin if (a<0) or (a>maxoffs) end; function argo(a:double):size; -begin if (a<0) or (a>maxoffs) +begin if (a<=0) or (a>maxoffs) then trap(EODDZ) else if (a mod wsize<>0) and (wsize mod a<>0) then trap(EODDZ); argo:=a ;