PRO Sample3
; Define variables for the shared object and symbol parameters
; for LINKNLOAD.
      object = 'sample3'
      object = '.\sample3\Debug\' + object + '.dll'
      symbol = 'linknload_sample3'


; CALL C FUNCTION --- Use LINKNLOAD to call the C function
      result = LINKNLOAD (object, symbol, /S_Value)
      Print,'len=',Strlen(result)
      Info,result


;--- Check variable name & datasize ---
      result = Strcompress(result)
      data = Strsplit(result, ' ')
      data_name=data(0)
      data_num=N_Elements(data)-1
      s = Execute(data(0)+'=Float(data(1:*))')
;      Print, data_name
;      Print, data(1:*)

;--- Confirm created data ---
       Info,fltdata
       Print,fltdata

END