Skip to content

Commit 6c6d4a7

Browse files
committed
First draft to implement a simple CJ explorer
0 parents  commit 6c6d4a7

File tree

8 files changed

+1122
-0
lines changed

8 files changed

+1122
-0
lines changed

CJ-client-safe.ecf

Lines changed: 21 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,21 @@
1+
<?xml version="1.0" encoding="ISO-8859-1"?>
2+
<system xmlns="http://www.eiffel.com/developers/xml/configuration-1-10-0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.eiffel.com/developers/xml/configuration-1-10-0 http://www.eiffel.com/developers/xml/configuration-1-10-0.xsd" name="cj-client" uuid="FCEA5603-8163-4FE6-B57C-81C37BD8DD44">
3+
<target name="cj-client">
4+
<root class="CJ_CLIENT_APPLICATION" feature="make_and_launch"/>
5+
<file_rule>
6+
<exclude>/.git$</exclude>
7+
<exclude>/EIFGENs$</exclude>
8+
<exclude>/.svn$</exclude>
9+
</file_rule>
10+
<option warning="true" full_class_checking="true" is_attached_by_default="true" void_safety="all" syntax="standard">
11+
</option>
12+
<setting name="concurrency" value="thread"/>
13+
<library name="base" location="$ISE_LIBRARY\library\base\base-safe.ecf"/>
14+
<library name="cj" location="..\CJ\library\cj-safe.ecf"/>
15+
<library name="http_client" location="..\..\EWF-jocelyn\library\network\http_client\http_client-safe.ecf"/>
16+
<library name="json.ecf" location="$ISE_LIBRARY\contrib\library\text\parser\json\library\json-safe.ecf"/>
17+
<library name="thread" location="$ISE_LIBRARY\library\thread\thread-safe.ecf"/>
18+
<library name="vision2" location="$ISE_LIBRARY\library\vision2\vision2-safe.ecf"/>
19+
<cluster name="src" location=".\src\" recursive="true"/>
20+
</target>
21+
</system>

CJ-client.ecf

Lines changed: 20 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,20 @@
1+
<?xml version="1.0" encoding="ISO-8859-1"?>
2+
<system xmlns="http://www.eiffel.com/developers/xml/configuration-1-8-0" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.eiffel.com/developers/xml/configuration-1-8-0 http://www.eiffel.com/developers/xml/configuration-1-8-0.xsd" name="CJ-client" uuid="FCEA5603-8163-4FE6-B57C-81C37BD8DD44">
3+
<target name="CJ-client">
4+
<root class="APPLICATION" feature="make"/>
5+
<file_rule>
6+
<exclude>/.git$</exclude>
7+
<exclude>/EIFGENs$</exclude>
8+
<exclude>/.svn$</exclude>
9+
</file_rule>
10+
<option warning="true" full_class_checking="true" void_safety="none" syntax="standard">
11+
</option>
12+
<setting name="concurrency" value="thread"/>
13+
<library name="cj" location="..\CJ\library\cj.ecf"/>
14+
<library name="http_client" location="..\..\EWF-jocelyn\library\network\http_client\http_client.ecf"/>
15+
<library name="json.ecf" location="$ISE_LIBRARY/library/json.ecf/json.ecf.ecf"/>
16+
<library name="base" location="$ISE_LIBRARY/library/base/base.ecf"/>
17+
<library name="thread" location="$ISE_LIBRARY/library/thread/thread.ecf"/>
18+
<cluster name="src" location="./src" recursive="true"/>
19+
</target>
20+
</system>

src/cj_client_application.e

Lines changed: 41 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,41 @@
1+
note
2+
description: "Objects that ..."
3+
author: "$Author$"
4+
date: "$Date$"
5+
revision: "$Revision$"
6+
7+
class
8+
CJ_CLIENT_APPLICATION
9+
10+
inherit
11+
EV_APPLICATION
12+
13+
create
14+
make_and_launch
15+
16+
feature {NONE} -- Initialization
17+
18+
make_and_launch
19+
local
20+
w: CJ_CLIENT_WINDOW
21+
args: ARGUMENTS
22+
do
23+
create w
24+
main_window := w
25+
26+
default_create
27+
w.show
28+
29+
create args
30+
if args.argument_count > 0 then
31+
w.set_field_url_from_location (args.argument (1))
32+
end
33+
34+
launch
35+
end
36+
37+
feature {NONE} -- Implementation
38+
39+
main_window: EV_WINDOW
40+
41+
end

0 commit comments

Comments
 (0)