From f586956618b1c23d088cd9b8f115393e4ddaebdf Mon Sep 17 00:00:00 2001 From: keie Date: Thu, 31 Jan 1985 14:03:56 +0000 Subject: [PATCH] Zero is deleted as a possible argument to LOI and STI. Allowing that was an oversight. --- doc/em/em.i | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 ; -- 2.34.1