structures byval for params and returns so it's compatible with c, libs like chipmunk, raylib, miniaudio
defaults for structures and fill
Code: Select all
Procedure.vec2 VecScale(a.vec2,mag.f)
;a by val , returns vec2 by val
define result.vec2
result\x = a\x * mag
result\y = a\y * mag
if mag <> 0
procedureReturn result
else
procedureReturn = {1.0,1.0} ;default fill
endif
EndProcedure
mVec.vec2 = VecScale(a,0.5)
;Defaults for structures
structure foo
a.i = 123
b.s = "foo"
ar.i[10] = {1,2,3,4,5,6,7,8,9,10}
EndStructure
;fill arrays like c
dim gA.Vec2() = {1,1,2,2,3,3,4,4,5,5}



