Thanks to visit codestin.com
Credit goes to github.com

Skip to content

Commit 0076bc4

Browse files
ShoelaceShoelace
committed
add NOCOPY to all SELF object parameters
1 parent 61c0e22 commit 0076bc4

10 files changed

Lines changed: 24 additions & 24 deletions

‎source/core/types/ut_assert_result.tpb‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
create or replace type body ut_assert_result is
22

3-
constructor function ut_assert_result(a_result integer, a_error_message varchar2, a_name varchar2 default null)
3+
constructor function ut_assert_result(self in out nocopy ut_assert_result, a_result integer, a_error_message varchar2, a_name varchar2 default null)
44
return self as result is
55
begin
66
self.name := a_name;
@@ -10,7 +10,7 @@ create or replace type body ut_assert_result is
1010
return;
1111
end ut_assert_result;
1212

13-
constructor function ut_assert_result(a_name varchar2, a_additional_info varchar2, a_error_message varchar2, a_result integer, a_expected_type varchar2, a_actual_type varchar2,
13+
constructor function ut_assert_result(self in out nocopy ut_assert_result, a_name varchar2, a_additional_info varchar2, a_error_message varchar2, a_result integer, a_expected_type varchar2, a_actual_type varchar2,
1414
a_expected_value_string varchar2, a_actual_value_string varchar2, a_message varchar2 default null)
1515
return self as result is
1616
begin

‎source/core/types/ut_assert_result.tps‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -7,9 +7,9 @@ create or replace type ut_assert_result force under ut_object
77
actual_value_string varchar2(4000 char),
88
message varchar2(4000 char),
99
error_message varchar2(4000 char),
10-
constructor function ut_assert_result(a_result integer, a_error_message varchar2, a_name varchar2 default null)
10+
constructor function ut_assert_result(self in out nocopy ut_assert_result, a_result integer, a_error_message varchar2, a_name varchar2 default null)
1111
return self as result,
12-
constructor function ut_assert_result(a_name varchar2, a_additional_info varchar2, a_error_message varchar2,
12+
constructor function ut_assert_result(self in out nocopy ut_assert_result, a_name varchar2, a_additional_info varchar2, a_error_message varchar2,
1313
a_result integer, a_expected_type varchar2, a_actual_type varchar2,
1414
a_expected_value_string varchar2, a_actual_value_string varchar2, a_message varchar2 default null)
1515
return self as result

‎source/core/types/ut_composite_reporter.tpb‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
create or replace type body ut_composite_reporter is
22

3-
constructor function ut_composite_reporter(a_reporters ut_reporters_list default ut_reporters_list())
3+
constructor function ut_composite_reporter(self in out nocopy ut_composite_reporter,a_reporters ut_reporters_list default ut_reporters_list())
44
return self as result is
55
begin
66
self.name := $$plsql_unit;

‎source/core/types/ut_composite_reporter.tps‎

Lines changed: 11 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -2,44 +2,44 @@ create or replace type ut_composite_reporter under ut_reporter
22
(
33
reporters ut_reporters_list,
44

5-
constructor function ut_composite_reporter(a_reporters ut_reporters_list default ut_reporters_list())
5+
constructor function ut_composite_reporter(self in out nocopy ut_composite_reporter,a_reporters ut_reporters_list default ut_reporters_list())
66
return self as result,
7-
member procedure add_reporter(self in out nocopy ut_composite_reporter, a_reporter ut_reporter),
7+
member procedure add_reporter (self in out nocopy ut_composite_reporter, a_reporter ut_reporter),
88
member procedure remove_reporter(self in out nocopy ut_composite_reporter, a_index pls_integer),
99

1010
-- tese-run hooks
1111
overriding member procedure before_run(self in out nocopy ut_composite_reporter, a_suites in ut_objects_list),
12-
overriding member procedure after_run(self in out nocopy ut_composite_reporter, a_suites in ut_objects_list),
12+
overriding member procedure after_run (self in out nocopy ut_composite_reporter, a_suites in ut_objects_list),
1313

1414
-- suite hooks
1515
overriding member procedure before_suite(self in out nocopy ut_composite_reporter, a_suite in ut_object),
1616

1717
overriding member procedure before_suite_setup(self in out nocopy ut_composite_reporter, a_suite in ut_object),
18-
overriding member procedure after_suite_setup(self in out nocopy ut_composite_reporter, a_suite in ut_object),
18+
overriding member procedure after_suite_setup (self in out nocopy ut_composite_reporter, a_suite in ut_object),
1919

2020
overriding member procedure before_suite_item(self in out nocopy ut_composite_reporter, a_suite in ut_object, a_item_index pls_integer),
21-
overriding member procedure after_suite_item(self in out nocopy ut_composite_reporter, a_suite in ut_object, a_item_index pls_integer),
21+
overriding member procedure after_suite_item (self in out nocopy ut_composite_reporter, a_suite in ut_object, a_item_index pls_integer),
2222

2323
overriding member procedure before_suite_teardown(self in out nocopy ut_composite_reporter, a_suite in ut_object),
24-
overriding member procedure after_suite_teardown(self in out nocopy ut_composite_reporter, a_suite in ut_object),
24+
overriding member procedure after_suite_teardown (self in out nocopy ut_composite_reporter, a_suite in ut_object),
2525

2626
overriding member procedure after_suite(self in out nocopy ut_composite_reporter, a_suite in ut_object),
2727

2828
-- test hooks
2929
overriding member procedure before_test(self in out nocopy ut_composite_reporter, a_test in ut_object),
3030

3131
overriding member procedure before_test_setup(self in out nocopy ut_composite_reporter, a_test in ut_object),
32-
overriding member procedure after_test_setup(self in out nocopy ut_composite_reporter, a_test in ut_object),
32+
overriding member procedure after_test_setup (self in out nocopy ut_composite_reporter, a_test in ut_object),
3333

3434
overriding member procedure before_test_execute(self in out nocopy ut_composite_reporter, a_test in ut_object),
35-
overriding member procedure after_test_execute(self in out nocopy ut_composite_reporter, a_test in ut_object),
35+
overriding member procedure after_test_execute (self in out nocopy ut_composite_reporter, a_test in ut_object),
3636

3737
overriding member procedure before_test_teardown(self in out nocopy ut_composite_reporter, a_test in ut_object),
38-
overriding member procedure after_test_teardown(self in out nocopy ut_composite_reporter, a_test in ut_object),
38+
overriding member procedure after_test_teardown (self in out nocopy ut_composite_reporter, a_test in ut_object),
3939

4040
overriding member procedure before_asserts_process(self in out nocopy ut_composite_reporter, a_test in ut_object),
41-
overriding member procedure on_assert_process(self in out nocopy ut_composite_reporter, a_assert in ut_object),
42-
overriding member procedure after_asserts_process(self in out nocopy ut_composite_reporter, a_test in ut_object),
41+
overriding member procedure on_assert_process (self in out nocopy ut_composite_reporter, a_assert in ut_object),
42+
overriding member procedure after_asserts_process (self in out nocopy ut_composite_reporter, a_test in ut_object),
4343

4444
overriding member procedure after_test(self in out nocopy ut_composite_reporter, a_test in ut_object)
4545

‎source/core/types/ut_reporter.tpb‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
create or replace type body ut_reporter is
22

3-
constructor function ut_reporter return self as result is
3+
constructor function ut_reporter(self in out nocopy ut_reporter) return self as result is
44
begin
55
self.name := 'Null reporter';
66
return;

‎source/core/types/ut_reporter.tps‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@ create or replace type ut_reporter force as object
22
(
33
name varchar2(250 char),
44

5-
constructor function ut_reporter return self as result,
5+
constructor function ut_reporter(self in out nocopy ut_reporter) return self as result,
66

77
-- tese-run hooks
88
member procedure before_run(self in out nocopy ut_reporter, a_suites in ut_objects_list),

‎source/core/types/ut_reporter_decorator.tpb‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
create or replace type body ut_reporter_decorator is
22

3-
constructor function ut_reporter_decorator(a_decorated_reporter ut_reporter) return self as result is
3+
constructor function ut_reporter_decorator(self in out nocopy ut_reporter_decorator,a_decorated_reporter ut_reporter) return self as result is
44
begin
55
init(a_decorated_reporter);
66
return;

‎source/core/types/ut_reporter_decorator.tps‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@ create or replace type ut_reporter_decorator under ut_reporter
22
(
33
decorated_reporter ut_reporter,
44

5-
constructor function ut_reporter_decorator(a_decorated_reporter ut_reporter) return self as result,
5+
constructor function ut_reporter_decorator(self in out nocopy ut_reporter_decorator, a_decorated_reporter ut_reporter) return self as result,
66
member procedure init(self in out nocopy ut_reporter_decorator, a_decorated_reporter ut_reporter)
77

88
) not final not instantiable

‎source/reporters/ut_dbms_output_suite_reporter.tpb‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -5,13 +5,13 @@ create or replace type body ut_dbms_output_suite_reporter is
55
return lpad('-', 80, '-');
66
end;
77

8-
constructor function ut_dbms_output_suite_reporter return self as result is
8+
constructor function ut_dbms_output_suite_reporter(self in out nocopy ut_dbms_output_suite_reporter) return self as result is
99
begin
1010
self.name := $$plsql_unit;
1111
return;
1212
end;
1313

14-
member procedure print(msg varchar2) is
14+
member procedure print(self in out nocopy ut_dbms_output_suite_reporter,msg varchar2) is
1515
begin
1616
dbms_output.put_line(msg);
1717
end print;

‎source/reporters/ut_dbms_output_suite_reporter.tps‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,10 +1,10 @@
11
create or replace type ut_dbms_output_suite_reporter force under ut_reporter
22
(
33

4-
constructor function ut_dbms_output_suite_reporter return self as result,
4+
constructor function ut_dbms_output_suite_reporter(self in out nocopy ut_dbms_output_suite_reporter) return self as result,
55

66
static function c_dashed_line return varchar2,
7-
member procedure print(msg varchar2),
7+
member procedure print(self in out nocopy ut_dbms_output_suite_reporter, msg varchar2),
88

99
overriding member procedure before_suite(self in out nocopy ut_dbms_output_suite_reporter, a_suite ut_object),
1010
overriding member procedure before_test(self in out nocopy ut_dbms_output_suite_reporter, a_test ut_object),

0 commit comments

Comments
 (0)