File tree Expand file tree Collapse file tree 2 files changed +3
-3
lines changed Expand file tree Collapse file tree 2 files changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -101,7 +101,7 @@ subroutine test_4(error_cnt)
101101 write (error_unit,' (A)' ) ' write to string'
102102 write (error_unit,' (A)' ) ' '
103103 ! write it to a string, and print to console:
104- call core% deserialize (p, string)
104+ call core% serialize (p, string)
105105 if (core% failed()) then
106106 call core% print_error_message(error_unit)
107107 error_cnt = error_cnt + 1
Original file line number Diff line number Diff line change @@ -125,7 +125,7 @@ subroutine test_11(error_cnt)
125125 end if
126126
127127 write (error_unit,' (A)' ) ' '
128- call clone% serialize (cval)
128+ call clone% deserialize (cval)
129129 if ( clone% failed()) then
130130 call clone% print_error_message(error_unit)
131131 error_cnt = error_cnt + 1
@@ -236,7 +236,7 @@ subroutine test_11(error_cnt)
236236 end if
237237
238238 write (error_unit,' (A)' ) ' '
239- call json% deserialize (cval)
239+ call json% serialize (cval)
240240 if (json% failed()) then
241241 call json% print_error_message(error_unit)
242242 error_cnt = error_cnt + 1
You can’t perform that action at this time.
0 commit comments