root/lang/perl/PerlMachine/trunk/kernel/isr.S @ 12453

Revision 12453, 469 bytes (checked in by wakapon, 6 years ago)

add perlos-libc

Line 
1#define ASM_FILE
2
3#include <asm/linkage.h>
4#include <kernel/idt.h>
5
6.text
7
8// キーボード
9ENTRY(irq1)
10   pushal
11   pushl %ebp
12   movl %esp, %ebp
13
14   pushl $1
15   call pic_mask_and_ack
16   addl $4, %esp
17   call keyboard_handler
18
19   popl %ebp
20   popal
21
22   iret
23
24// フロッピードライブ
25ENTRY(irq6)
26   pushal
27   pushl %ebp
28   movl %esp, %ebp
29
30   pushl $6
31   call pic_mask_and_ack
32   addl $4, %esp
33   call floppy_handler
34
35   popl %ebp
36   popal
37   
38   iret
39
40.data
41
Note: See TracBrowser for help on using the browser.