Re: What's wrong with this little TSR?

Article View: comp.lang.pascal.borland

Article #704

Back to comp.lang.pascal.borland Previous Next

#704

From: Ing. Franz Glaser
Date: Tue, 25 Aug 1998 00:00

20 lines
1596 bytes

Esky wrote:
> 
> procedure CountTime; interrupt;
> begin
>         asm       { this will stop another INTERRUPT }
>         cli;      { Interrupting this interrupt      }
>         pushf;
>         end;
> 
> --------------------------------
> 
>         asm       { Enable INTERRUPTS again         }
>         sti;
>         popf;

---> ???? popped the cleared I-flag here!

>         end;
> end;
Franz Glaser

Technical Details

Message-ID: <35E2FD32.97351F78@eunet.at>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

References: <35ded96b.41078299@news.rz.uni-karlsruhe.de> <35E20513.EF631A2F@hotmail.com>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 1006de,9bcc55cc3c0b88c1
X-Google-Attributes: gid1006de,public
X-Google-Thread: 110467,9bcc55cc3c0b88c1
X-Google-Attributes: gid110467,public
X-Google-Thread: 110930,9bcc55cc3c0b88c1
X-Google-Attributes: gid110930,public
X-Google-Thread: 10261c,9bcc55cc3c0b88c1
X-Google-Attributes: gid10261c,public
X-Google-Thread: 111659,9bcc55cc3c0b88c1
X-Google-Attributes: gid111659,public
From: "Ing. Franz Glaser" <meg-glaser@eunet.at>
Subject: Re: What's wrong with this little TSR?
Date: 1998/08/25
Message-ID: <35E2FD32.97351F78@eunet.at>
X-Deja-AN: 384494654
Content-Transfer-Encoding: 7bit
References: <35ded96b.41078299@news.rz.uni-karlsruhe.de> <35E20513.EF631A2F@hotmail.com>
X-Priority: 3 (Normal)
Content-Type: text/plain; charset=us-ascii
X-Complaints-To: abuse@Austria.EU.net
X-Trace: fleetstreet.Austria.EU.net 904035989 15118 193.81.169.132 (25 Aug 1998 09:06:29 GMT)
Organization: MEG-Glaser
Mime-Version: 1.0
NNTP-Posting-Date: 25 Aug 1998 09:06:29 GMT
Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.misc,de.comp.lang.pascal.misc,fido.ger.pascal,z-netz.sprachen.pascal

Reply to Parent Message