Author: wmb Date: 2010-01-08 08:23:30 +0100 (Fri, 08 Jan 2010) New Revision: 1650
Modified: cpu/x86/pc/olpc/via/suspend.fth Log: Via - turn interrupt and timer machinery back on after resume from S3, so alarms and related timing things work.
Modified: cpu/x86/pc/olpc/via/suspend.fth =================================================================== --- cpu/x86/pc/olpc/via/suspend.fth 2010-01-08 02:23:07 UTC (rev 1649) +++ cpu/x86/pc/olpc/via/suspend.fth 2010-01-08 07:23:30 UTC (rev 1650) @@ -31,13 +31,19 @@ sp@ 4 - h# f0000 ax-call \ sp@ 4 - is a dummy pdir-va location [then] \ sum-forth + lock[ + " init" pic-node $call-method + " setup-apic" apic-ih $call-method + " setup-io-apic" io-apic-ih $call-method + d# 10 set-tick-limit + ]unlock ; : kb-suspend ( -- ) sci-wakeup begin begin 1 ms key? while key dup [char] q = abort" Quit" emit repeat s3 - again + again ; : s3-suspend audio-ih if audio-ih close-dev 0 to audio-ih then