mirror of
https://github.com/QB64-Phoenix-Edition/QB64pe.git
synced 2024-07-06 01:10:23 +00:00
Merge branch 'QB64-Phoenix-Edition:main' into image-load-from-memory-support
This commit is contained in:
commit
e1e6203db9
63160
internal/source/main.txt
63160
internal/source/main.txt
File diff suppressed because it is too large
Load diff
|
@ -17783,7 +17783,9 @@ FUNCTION evaluatefunc$ (a2$, args AS LONG, typ AS LONG)
|
|||
NEXT
|
||||
|
||||
' Add on any extra optional arguments that were not provided
|
||||
IF curarg <= id2.args THEN
|
||||
'
|
||||
' Overloaded functions do not require the omited arguments to be provided
|
||||
IF curarg <= id2.args AND NOT id2.overloaded THEN
|
||||
FOR i = curarg TO id2.args
|
||||
IF i = 1 THEN r$ = r$ + "NULL" ELSE r$ = r$ + ",NULL"
|
||||
NEXT
|
||||
|
|
8
tests/compile_tests/colors/test.bas
Normal file
8
tests/compile_tests/colors/test.bas
Normal file
|
@ -0,0 +1,8 @@
|
|||
$Console:Only
|
||||
|
||||
Print "Grey, max alpha: "; Hex$(_RGB32(&H7F))
|
||||
Print "Grey, half alpha: "; Hex$(_RGB32(&H7F, &H7F))
|
||||
Print "Grey, max alpha: "; Hex$(_RGB32(&H7F, &H7F, &H7F))
|
||||
Print "Grey, half alpha: "; Hex$(_RGB32(&H7F, &H7F, &H7F, &H7F))
|
||||
|
||||
System
|
4
tests/compile_tests/colors/test.output
Normal file
4
tests/compile_tests/colors/test.output
Normal file
|
@ -0,0 +1,4 @@
|
|||
Grey, max alpha: FF7F7F7F
|
||||
Grey, half alpha: 7F7F7F7F
|
||||
Grey, max alpha: FF7F7F7F
|
||||
Grey, half alpha: 7F7F7F7F
|
Loading…
Reference in a new issue