/[eiffelstudio]/branches/eth/eve/benchmarks/scoop/scoop_winnow/matrix_array.e
ViewVC logotype

Contents of /branches/eth/eve/benchmarks/scoop/scoop_winnow/matrix_array.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 93415 - (show annotations)
Sun Nov 17 16:05:44 2013 UTC (5 years, 11 months ago) by wests
File size: 816 byte(s)
Updating scoop benchmarks to improve speed, increase test case size.

1 note
2 description: "Summary description for {MATRIX_ARRAY}."
3 author: ""
4 date: "$Date$"
5 revision: "$Revision$"
6
7 class
8 MATRIX_ARRAY
9
10 inherit
11 ARRAY2[INTEGER]
12
13 create
14 make_with_content
15
16 feature
17 make_with_content (a_rows, a_cols: INTEGER; a_bench: BOOLEAN)
18 local
19 i, j, v: INTEGER
20 do
21 make_filled (0, a_rows, a_cols)
22
23 from i := 1
24 until i > a_rows
25 loop
26 from j := 1
27 until j > a_cols
28 loop
29 if a_bench then
30 v := 0
31 else
32 v := read_integer
33 end
34 Current [i, j] := v
35 j := j + 1
36 end
37 i := i + 1
38 end
39 end
40
41 read_integer: INTEGER
42 do
43 -- FIXME: read from the file, how to pass the file appropriately to
44 -- different processors?
45 Result := 0
46 end
47
48 end

Properties

Name Value
svn:eol-style native
svn:keywords author date id revision

  ViewVC Help
Powered by ViewVC 1.1.23