-
Notifications
You must be signed in to change notification settings - Fork 131
Expand file tree
/
Copy pathplib_parse_err.exp
More file actions
26 lines (18 loc) · 967 Bytes
/
plib_parse_err.exp
File metadata and controls
26 lines (18 loc) · 967 Bytes
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
SCHEMA cant_resolve;
(* derived from LongForm25IsoIec, a schema in PLIB Part 25 *)
-- has trouble with in_parameters in this fn
FUNCTION correct_parameters_for_explicit_program(its_value: controlled_entity_instance_value ) : BOOLEAN;
IF (QUERY(in_p <* its_value.in_parameters | NOT ('NO.VALUE' IN TYPEOF(in_p))) = []) THEN
RETURN (TRUE);
END_IF;
END_FUNCTION;
-- substituting plib_entity_instance_value for this in the fn makes the problem go away
TYPE controlled_entity_instance_value = SELECT (plib_entity_instance_value); END_TYPE;
-- no error without representation_reference here
TYPE plib_entity_instance_value = SELECT (program_reference, representation_reference); END_TYPE;
ENTITY class_extension_external_item; END_ENTITY;
ENTITY representation_reference SUBTYPE OF (class_extension_external_item); END_ENTITY;
ENTITY program_reference SUBTYPE OF (class_extension_external_item);
in_parameters : LIST OF string;
END_ENTITY;
END_SCHEMA;