Fixed temporary restbucks example.

- use concurrency none to workaround a concurrency issue of DB_ACCESS
- use console_application for convenience
- use default http client, to use net implementation if curl is not available.
This commit is contained in:
2017-01-26 09:52:44 +01:00
parent a6245351ef
commit 1b24fb63f7
6 changed files with 10 additions and 4 deletions

View File

@@ -9,6 +9,7 @@
</file_rule>
<option warning="true" void_safety="all">
</option>
<setting name="console_application" value="true"/>
<setting name="concurrency" value="scoop"/>
<library name="base" location="$ISE_LIBRARY\library\base\base-safe.ecf"/>
<library name="http_client" location="..\..\..\library\network\http_client\http_client-safe.ecf" readonly="false"/>

View File

@@ -9,6 +9,7 @@
</file_rule>
<option warning="true" void_safety="none">
</option>
<setting name="console_application" value="true"/>
<setting name="concurrency" value="scoop"/>
<library name="base" location="$ISE_LIBRARY\library\base\base.ecf"/>
<library name="http_client" location="..\..\..\library\network\http_client\http_client.ecf"/>

View File

@@ -15,13 +15,13 @@ feature {NONE} -- Initialization
make
-- Initialize `Current'.
local
h: LIBCURL_HTTP_CLIENT
h: DEFAULT_HTTP_CLIENT
sess: HTTP_CLIENT_SESSION
resp : detachable HTTP_CLIENT_RESPONSE
l_location : detachable READABLE_STRING_8
body : STRING
do
create h.make
create h
sess := h.new_session ("http://127.0.0.1:9090")
-- Uncomment the following 2 lines, if you use fiddler2 web debugging tool
-- sess.set_is_debug (True)