TEST: 1002B-T11-X

status

Compilation and execution results for Windows (first) and Mono (second)

PASSED

Compiler: 1.2.8.0
Date, time: 2010.08.06, 18:06
Compilation: ERROR
Execution: NOT RUN

(9, 10) Duplicate declaration with the name 'B' in the current scope
(26, 18) Neither type nor type name is given in declaration.
(26, 18) Name 'C' does not denote a type as expected.
(11, 29) Neither type nor type name is given in declaration.
(11, 29) Name 'C' does not denote a type as expected.
(23, 12) Cannot find compilation unit 'argument'; is it an external unreferenced unit?

PASSED

Compiler: 1.2.8.0
Date, time: 2010.08.06, 22:22
Compilation: ERROR
Execution: NOT RUN

code

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

(**
  * 11. Program Units.
  * 11.2. object
  * IMPLEMENTS clause
  *
  * Negative test: the DEFINITION C is used as parameter type.
  *)
object {public} A implements B;
      import B, C;

      procedure { public } P(c : C) : integer;
      begin end P;
begin
end A.

module Main;
      var k : integer;
begin
      if k = 1
      then halt(1) else halt(0) end;
end Main.

definition {public} B;
      import C;

      procedure P(c : C) : integer;
end B.

definition {public} C;
end C.

information

PASSED - overall positive decision about the test
NOT PASSED - overall negative decision about the test
SUCCESS - compilation / execution successful
ERROR - compilation failed with normal syntax or semantic error
ABORT - compilation failed because of an internal compiler error
NOT RUN - the test was not / not supposed to be executed
FAIL - execution failed

TEST: 1002B-T11-X

category

status

code

information