Code : Tout sélectionner
Procedure.s Concat(a.s,b.s)
ProcedureReturn (a+" "+b)
EndProcedure
a.s{8}
b.s{32}
a = "Pure"
b = "Basic"
Concat(a,b) ; invalid access memory
Code : Tout sélectionner
Procedure.s Concat(arg1.l,arg2.l)
str1.s{8} = PeekS(arg1,8)
Debug str1 ; invalid access memory
str2.s{32} = PeekS(arg2,32)
Debug str2 ; invalid access memory
ProcedureReturn (str1+" "+str2)
EndProcedure
a.s{8} = "Pure"
b.s{32} = "Basic"
Concat(@a,@b)
