Code: Select all
Procedure.s s(a.s, b.s)
Protected a0.s{100}
Protected b0.s{100}
Protected r.s
a0 = a
b0 = b
r = a0 + b0
ProcedureReturn r
EndProcedure
a.s = "1234"
b.s = "5678"
Debug s(a, b)
Code: Select all
Define a.s = "1234"
Define b.s = "5678"
Define a0.s{100}
Define b0.s{100}
Define r.s
a0 = a
b0 = b
r = a0 + b0
Debug r
Code: Select all
Define a.s = "1234"
Define a0.s{100}
a0 = a
Code: Select all
---------------------------
PureBasic - Assembler error
---------------------------
error: implicit declaration of function 'SYS_AssignFixedStringFast' [-Werror=implicit-function-declaration]
393 | SYS_AssignFixedStringFast(p0,100,v_a);
| ^~~~~~~~~~~~~~~~~~~~~~~~~
compilation terminated due to -Wfatal-errors.
cc1: some warnings b

