Lines Matching refs:c
43 c eval urllen = trimmed_length(url: %len(url))
47 c callp curl_global_init(CURL_GLOBAL_ALL)
48 c callp main
49 c callp curl_global_cleanup()
50 c seton lr Exit
67 c eval h = curl_easy_init()
68 c if h <> *NULL
69 c callp curl_easy_setopt_ccsid(h: CURLOPT_URL:
70 c %subst(url: 1: urllen): 0)
71 c callp curl_easy_setopt_long(h:
72 c CURLOPT_FOLLOWLOCATION: 1)
76 c eval result = curl_easy_perform(h)
77 c callp curl_easy_cleanup(h) Release handle
78 c endif
82 c if result <> CURLE_OK
83 c eval errmsgp = curl_easy_strerror_ccsid(result: 0)
84 c eval response = %str(errmsgp)
85 c dsply response
86 c endif
100 c eval len = %scan(X'00': string: 1: length) Limit 0-terminated
101 c if len = 0
102 c eval len = length + 1
103 c endif
104 c if len <= 1
105 c return 0
106 c endif
107 c return %checkr(' ': string: len - 1) Trim right
