Use new syntax for object test and attached/detachable type.
git-svn-id: https://svn.origo.ethz.ch/eiffelstudio/trunk/Src/library/cURL@77298 8089f293-4706-0410-a29e-feb5c42a2edf
This commit is contained in:
@@ -41,7 +41,7 @@ feature -- Command
|
|||||||
create l_c_string.make_shared_from_pointer_and_count (a_data_pointer, Result)
|
create l_c_string.make_shared_from_pointer_and_count (a_data_pointer, Result)
|
||||||
|
|
||||||
create l_identified
|
create l_identified
|
||||||
if {l_string: CURL_STRING} l_identified.id_object (a_object_id.to_integer_32) then
|
if attached {CURL_STRING} l_identified.id_object (a_object_id.to_integer_32) as l_string then
|
||||||
l_string.append (l_c_string.string)
|
l_string.append (l_c_string.string)
|
||||||
else
|
else
|
||||||
check False end
|
check False end
|
||||||
|
|||||||
@@ -145,7 +145,7 @@ feature -- Special setting
|
|||||||
curl_function: CURL_FUNCTION
|
curl_function: CURL_FUNCTION
|
||||||
-- cURL functions in curl_easy_setopt.
|
-- cURL functions in curl_easy_setopt.
|
||||||
do
|
do
|
||||||
if {l_curl_function: like curl_function} internal_curl_function then
|
if attached {like curl_function} internal_curl_function as l_curl_function then
|
||||||
Result := l_curl_function
|
Result := l_curl_function
|
||||||
else
|
else
|
||||||
create {CURL_DEFAULT_FUNCTION} Result.make
|
create {CURL_DEFAULT_FUNCTION} Result.make
|
||||||
@@ -198,7 +198,7 @@ feature -- Special setting
|
|||||||
|
|
||||||
feature {NONE} -- Implementation
|
feature {NONE} -- Implementation
|
||||||
|
|
||||||
internal_curl_function: ?CURL_FUNCTION
|
internal_curl_function: detachable CURL_FUNCTION
|
||||||
-- cURL functions.
|
-- cURL functions.
|
||||||
|
|
||||||
api_loader: API_LOADER
|
api_loader: API_LOADER
|
||||||
|
|||||||
Reference in New Issue
Block a user