Subversion Repositories Kolibri OS

Rev

Rev 5159 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5159 Rev 5163
Line 5... Line 5...
5
	mov edi,[context]
5
	mov edi,[context]
6
	add edi,offs_cont_clear_color
6
	add edi,offs_cont_clear_color
7
	mov ecx,4
7
	mov ecx,4
8
	rep movsd
8
	rep movsd
9
endp
9
	ret
-
 
10
endp
10
 
11
 
Line 11... Line 12...
11
align 4
12
align 4
12
proc glopClearDepth uses eax ebx, context:dword, p:dword
13
proc glopClearDepth uses eax ebx, context:dword, p:dword
13
	mov eax,[context]
14
	mov eax,[context]
Line 17... Line 18...
17
	ret
18
	ret
18
endp
19
endp
19
 
20
 
Line 20... Line 21...
20
align 4
21
align 4
-
 
22
fl_65535 dd 65535.0
-
 
23
 
-
 
24
align 4
21
proc glopClear uses eax ebx, context:dword, p:dword
25
proc glopClear uses eax ebx, context:dword, p:dword
22
	mov eax,[context]
26
	mov eax,[context]
23
	mov ebx,[eax+offs_cont_clear_color+8] ;context.clear_color.v[2]
27
	fld dword[eax+offs_cont_clear_color+8] ;context.clear_color.v[2]
24
	shl ebx,16
28
	fmul dword[fl_65535]
25
	push ebx
29
	fistp dword[esp-4]
26
	mov ebx,[eax+offs_cont_clear_color+4] ;context.clear_color.v[1]
30
	fld dword[eax+offs_cont_clear_color+4] ;context.clear_color.v[1]
27
	shl ebx,16
31
	fmul dword[fl_65535]
28
	push ebx
32
	fistp dword[esp-8]
29
	mov ebx,[eax+offs_cont_clear_color] ;context.clear_color.v[0]
33
	fld dword[eax+offs_cont_clear_color] ;context.clear_color.v[0]
-
 
34
	fmul dword[fl_65535]
30
	shl ebx,16
35
	fistp dword[esp-12]
31
	push ebx
36
	sub esp,12
Line 32... Line 37...
32
 
37
 
33
	mov ebx,[p]
38
	mov ebx,[p]
34
	mov ebx,[ebx+4] ;ebx = p[1]
39
	mov ebx,[ebx+4] ;ebx = p[1]
35
	and ebx,GL_COLOR_BUFFER_BIT
40
	and ebx,GL_COLOR_BUFFER_BIT