QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-06-29 11:40:38 +00:00
Code Issues Releases Wiki Activity

Merge branch 'Mingw-8.10-Compiler' into development

Browse source
This commit is contained in:
Luke Ceddia 2018-12-31 15:13:48 +11:00
parent 313c581fe7 c329ef85f6
commit 0f83689675
2 changed files with 8 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

BIN
internal/c/c_compiler/c_compiler.7z
View file

Binary file not shown.

18
internal/c/libqb.cpp
View file

@ -27,6 +27,11 @@ int32 disableEvents=0;
//This next block used to be in common.cpp; put here until I can find a better
//place for it (LC, 2018-01-05)
uint32 rotateLeft(uint32 word,uint32 shift){
return (word << shift) | (word >> (32 - shift));
}
#ifndef QB64_WINDOWS
void Sleep(uint32 milliseconds){
static uint64 sec,nsec;
@ -38,10 +43,6 @@ int32 disableEvents=0;
nanosleep (&ts, NULL);
}
// uint32 _lrotl(uint32 word,uint32 shift){
// return (word << shift) | (word >> (32 - shift));
// }
void ZeroMemory(void *ptr,int64 bytes){
memset(ptr,0,bytes);
}
@ -8936,8 +8937,7 @@ void qb32_line(float x1f,float y1f,float x2f,float y2f,uint32 col,uint32 style){
style=(style&65535)+(style<<16);
lineclip_skippixels&=15;
//style=_lrotl(style,lineclip_skippixels);
style=((style << lineclip_skippixels) | (style >> (32 - lineclip_skippixels)));
style=rotateLeft(style,lineclip_skippixels);
if (lineclip_draw){
l=abs(lineclip_x1-lineclip_x2);
@ -8954,8 +8954,7 @@ void qb32_line(float x1f,float y1f,float x2f,float y2f,uint32 col,uint32 style){
while (l--){
if (y1f<0) lineclip_y1=y1f-0.5f; else lineclip_y1=y1f+0.5f;
//if ((style=_lrotl(style,1))&1){
if (style=((style << 1) | (style >> 31))&1){
if ((style=rotateLeft(style,1))&1){
pset(lineclip_x1,lineclip_y1,col);
}
@ -8974,8 +8973,7 @@ void qb32_line(float x1f,float y1f,float x2f,float y2f,uint32 col,uint32 style){
l2++;
while (l2--){
if (x1f<0) lineclip_x1=x1f-0.5f; else lineclip_x1=x1f+0.5f;
//if ((style=_lrotl(style,1))&1){
if (style=((style << 1) | (style >> 31))&1){
if ((style=rotateLeft(style,1))&1){
pset(lineclip_x1,lineclip_y1,col);
}
lineclip_y1+=mi;