Skip to content

Commit 6795d41

Browse files
pseewaldpseewald
committed
add unit test for multiline strings
1 parent c7888d4 commit 6795d41

File tree

2 files changed

+64
-3
lines changed

2 files changed

+64
-3
lines changed

‎fortran_tests/test_results/expected_results‎

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -285,7 +285,7 @@ RosettaCodeData/Task/Greatest-subsequential-sum/Fortran/greatest-subsequential-s
285285
RosettaCodeData/Task/Guess-the-number-With-feedback--player-/Fortran/guess-the-number-with-feedback--player-.f : 284ccc92b6f5fde65e43ce529074971fb418055d8072311a1cb75a58f851fdda
286286
RosettaCodeData/Task/Guess-the-number-With-feedback/Fortran/guess-the-number-with-feedback.f : 661105f97c992730108ac748b9a4dd20e5f726c52ec9a24ad91b4f79db083059
287287
RosettaCodeData/Task/Guess-the-number/Fortran/guess-the-number.f : 7a2df5abd11f66780892248c6783c5c4842503b110168cf9921688dcb8fdbe90
288-
RosettaCodeData/Task/HTTPS/Fortran/https.f : 757153d0f3735862667ba2856d81ad9db144ca17b5404c8d077f417bf066c463
288+
RosettaCodeData/Task/HTTPS/Fortran/https.f : 43910e3c3e68b4f36ecf5768ed55546bbebd46d325fcde8fb31f87c4e6718955
289289
RosettaCodeData/Task/Hailstone-sequence/Fortran/hailstone-sequence.f : 4004f858ce5a6cb7259346480311b0406539ddf26aa1fd42ed292c9b5fa7b120
290290
RosettaCodeData/Task/Hamming-numbers/Fortran/hamming-numbers.f : 240f87447439757653ab747a6204d7cca4ab34f5237acad498387ed1eaa60b02
291291
RosettaCodeData/Task/Happy-numbers/Fortran/happy-numbers.f : aab1f194326c253eaeac72ca3f10d155aaea5f1fd0f613cb318ea530d9fabffd
@@ -301,7 +301,7 @@ RosettaCodeData/Task/Hello-world-Standard-error/Fortran/hello-world-standard-err
301301
RosettaCodeData/Task/Hello-world-Text/Fortran/hello-world-text-1.f : 72eded4a9e386a5ddb9430da2bca5b11d851d20cf18c304a4449334bff0e2045
302302
RosettaCodeData/Task/Hello-world-Text/Fortran/hello-world-text-2.f : 061f685f5143707c22d608b55102e3da3a71dbedae5f2e71f3bc4216fc92073b
303303
RosettaCodeData/Task/Hello-world-Text/Fortran/hello-world-text-3.f : 32d370f88b797c1b42986192ee6bcbd195e089f0f04975b82cd92f9fadab675f
304-
RosettaCodeData/Task/Hello-world-Web-server/Fortran/hello-world-web-server.f : 48b637824c93c177eeeffdcda90046614f03e7880859f697cc136f8f2e63bb25
304+
RosettaCodeData/Task/Hello-world-Web-server/Fortran/hello-world-web-server.f : 85479ed055218ad1fc69c422e40d5710b6714962b576cea05fe2dcc7c76d785f
305305
RosettaCodeData/Task/Here-document/Fortran/here-document.f : internal error
306306
RosettaCodeData/Task/Heronian-triangles/Fortran/heronian-triangles.f : 140742694498790304d5cd8c79a3508498416501d176ff5ff84b845b087ba81d
307307
RosettaCodeData/Task/Hickerson-series-of-almost-integers/Fortran/hickerson-series-of-almost-integers.f : 950c5ef9194f04ea6e696d2068da307f582079c29c629b79ab14aa4881df28a1
@@ -329,7 +329,7 @@ RosettaCodeData/Task/Integer-comparison/Fortran/integer-comparison-1.f : 8062451
329329
RosettaCodeData/Task/Integer-comparison/Fortran/integer-comparison-4.f : e1e99a0d2a9a3859b586a719f5e1e2f6ff8388aaa378e7904d7da464055d8377
330330
RosettaCodeData/Task/Integer-sequence/Fortran/integer-sequence.f : 3bef7b2e0e8f9480d4e939581e2e722f21f558cf9505e63bbe7b0756589dd204
331331
RosettaCodeData/Task/Inverted-syntax/Fortran/inverted-syntax.f : 97c6463b3079aca08f11b73d95e56357be66b3402fc54f89a18f2b6f4a985b6b
332-
RosettaCodeData/Task/JSON/Fortran/json.f : 8dc779b76403e4415d7140e3a975a5e32241b3e7a277ec219f9abe3fdda3da4d
332+
RosettaCodeData/Task/JSON/Fortran/json.f : 4d4fc1bbb36274a62cf45cf6f8c00dfe76cf87f0b1944282b1ab090d27660e73
333333
RosettaCodeData/Task/Josephus-problem/Fortran/josephus-problem.f : 4f04283b00b3d5953ea35687692e455a132a06294733d45deec9a01e1c978fa3
334334
RosettaCodeData/Task/Kaprekar-numbers/Fortran/kaprekar-numbers.f : 2cab0f48c8f182577ab6417eef9b2d151c0e483a1d968c2aa01c889cdcd112dd
335335
RosettaCodeData/Task/Keyboard-input-Obtain-a-Y-or-N-response/Fortran/keyboard-input-obtain-a-y-or-n-response.f : c554f7c225e11e7c8381a45d4eda8c0200960592769745ee70e9cfdbd37ad0c7

‎fprettify/tests/__init__.py‎

Lines changed: 61 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -789,6 +789,67 @@ def test_statement_label(self):
789789
outstring = "1003 FORMAT(2(1x, i4), 5x, '-', 5x, '-', 3x, '-', 5x, '-', 5x, '-', 8x, '-', 3x, &\n 1p, 2(1x, d10.3))"
790790
self.assert_fprettify_result([], instring, outstring)
791791

792+
def test_multiline_str(self):
793+
794+
instring = []
795+
outstring = []
796+
797+
instring += [
798+
'''
799+
CHARACTER(len=*), PARAMETER :: serialized_string = &
800+
"qtb_rng_gaussian 1 F T F 0.0000000000000000E+00&
801+
12.0 12.0 12.0&
802+
12.0 12.0 12.0&
803+
12.0 12.0 12.0&
804+
12.0 12.0 12.0&
805+
12.0 12.0 12.0&
806+
12.0 12.0 12.0"
807+
'''
808+
]
809+
810+
outstring += [
811+
'''
812+
CHARACTER(len=*), PARAMETER :: serialized_string = &
813+
"qtb_rng_gaussian 1 F T F 0.0000000000000000E+00&
814+
& 12.0 12.0 12.0&
815+
& 12.0 12.0 12.0&
816+
& 12.0 12.0 12.0&
817+
& 12.0 12.0 12.0&
818+
& 12.0 12.0 12.0&
819+
& 12.0 12.0 12.0"
820+
'''
821+
]
822+
823+
instring += [
824+
'''
825+
CHARACTER(len=*), PARAMETER :: serialized_string = &
826+
"qtb_rng_gaussian 1 F T F 0.0000000000000000E+00&
827+
& 12.0 12.0 12.0&
828+
& 12.0 12.0 12.0&
829+
& 12.0 12.0 12.0&
830+
& 12.0 12.0 12.0&
831+
& 12.0 12.0 12.0&
832+
& 12.0 12.0 12.0"
833+
'''
834+
]
835+
836+
outstring += [
837+
'''
838+
CHARACTER(len=*), PARAMETER :: serialized_string = &
839+
"qtb_rng_gaussian 1 F T F 0.0000000000000000E+00&
840+
& 12.0 12.0 12.0&
841+
& 12.0 12.0 12.0&
842+
& 12.0 12.0 12.0&
843+
& 12.0 12.0 12.0&
844+
& 12.0 12.0 12.0&
845+
& 12.0 12.0 12.0"
846+
'''
847+
]
848+
849+
for instr, outstr in zip(instring, outstring):
850+
self.assert_fprettify_result([], instr, outstr)
851+
852+
792853

793854
def addtestmethod(testcase, fpath, ffile):
794855
"""add a test method for each example."""

0 commit comments

Comments
 (0)