BUG: "String is too long to fit" Error Passing Variables to COM

MORE INFORMATION

Steps to Reproduce Behavior

1. Place the following code into a new program file and save it as Test.prg:

         DEFINE CLASS test AS custom OLEPUBLIC
            Name = "test"
            PROCEDURE vartest
               Parameters xx
               xx=xx+"ddd"
               RETURN "Hello"
            ENDPROC
         ENDDEFINE

2. Create a new project and add the program from step 1 above to the project. Name the project Test.pjx.
3. From the Project Manager, build either an Executable or an OLE DLL. Name it Test.exe or Test.dll.
4. Place the following code into a new program file and run it:

         CLEAR
         x=CREATEOBJECT("test.test")
         IF TYPE("x")!="O"
            RETURN
         ENDIF
         z=REPLICATE("z",256)
         ? x.vartest(@z)
         ? z
         RETURN