From f74ab5567e1af9142b44df16f3b07f97c9052c73 Mon Sep 17 00:00:00 2001
From: Bob Dubner <rdubner@symas.com>
Date: Tue, 26 Mar 2024 21:43:37 -0400
Subject: [PATCH] Fix typo in parse.y comment; add ccc/p.py testing program
---
gcc/cobol/ccc/p.py | 11 +++++++++
gcc/cobol/failures/twocall/Makefile | 1 -
gcc/cobol/failures/twocall/caller.c | 12 ---------
gcc/cobol/failures/twocall/input.txt | 0
gcc/cobol/failures/twocall/twocall | Bin 24448 -> 0 bytes
gcc/cobol/failures/twocall/twocall.cbl | 33 -------------------------
gcc/cobol/parse.y | 1 -
gcc/cobol/tests/.gitignore | 1 +
8 files changed, 12 insertions(+), 47 deletions(-)
create mode 100644 gcc/cobol/ccc/p.py
delete mode 100644 gcc/cobol/failures/twocall/Makefile
delete mode 100644 gcc/cobol/failures/twocall/caller.c
delete mode 100644 gcc/cobol/failures/twocall/input.txt
delete mode 100644 gcc/cobol/failures/twocall/twocall
delete mode 100644 gcc/cobol/failures/twocall/twocall.cbl
diff --git a/gcc/cobol/ccc/p.py b/gcc/cobol/ccc/p.py
new file mode 100644
index 000000000000..cc446b384562
--- /dev/null
+++ b/gcc/cobol/ccc/p.py
@@ -0,0 +1,11 @@
+def main():
+ print("Hello")
+ f = open("xxx.c", 'w')
+ for i in range(10):
+ f.write(" LEFT\n")
+ f.write(" STATIC int a{} = {};\n".format(i, i))
+ f.write(" a{} = a{} + n;\n".format(i, i))
+ f.write(" foo(a{});\n".format(i))
+ f.write(" RIGHT\n")
+ f.close()
+main()
diff --git a/gcc/cobol/failures/twocall/Makefile b/gcc/cobol/failures/twocall/Makefile
deleted file mode 100644
index f77e46b3451a..000000000000
--- a/gcc/cobol/failures/twocall/Makefile
+++ /dev/null
@@ -1 +0,0 @@
-include ../Makefile.inc
diff --git a/gcc/cobol/failures/twocall/caller.c b/gcc/cobol/failures/twocall/caller.c
deleted file mode 100644
index 4d7eae01473d..000000000000
--- a/gcc/cobol/failures/twocall/caller.c
+++ /dev/null
@@ -1,12 +0,0 @@
-#include <stddef.h>
-#include <stdio.h>
-void called_cobol(size_t *, size_t *);
-
-void called_c (size_t)
- {
- size_t a = 1234;
- size_t b = 5678;
- printf("calling called_cobol from C\n");
- called_cobol(&a, &b);
- }
-
diff --git a/gcc/cobol/failures/twocall/input.txt b/gcc/cobol/failures/twocall/input.txt
deleted file mode 100644
index e69de29bb2d1..000000000000
diff --git a/gcc/cobol/failures/twocall/twocall b/gcc/cobol/failures/twocall/twocall
deleted file mode 100644
index 995f41ec30f79087038b98ce37f329c26d9e8831..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001
literal 24448
zcmc&+4|G)3nZGlWguws_;GZb8jv66RGbAB|pr`?iOe}vaf{QKsn9NL)!O6@xfB55q
zf*5O-jRjXLd&HV`=~=qRwrY=7Jy=m!vDH@E($$`2yL81}I9d;Sx*q?~y5D!-_sx8{
z%o`_$b9&F2_wN1O-}n2zd*6NU-TU54ZtqxhwcF)VoLuS(l`k=>)aD!V`F5RcS2gM^
zwIVR^&UJw;@9hMmz`%3upMU;&VBpDs-raw#-VLsV-J*g1)p|GB3%fh_WiF_y?@vOu
zs($h2s`?e%tLkqYs;ZAXR#o4(uc|(KpsIe;VG!*7ixymM?@p2KwsLGi|Gug_BNa;R
z*Cj-r$Ia8YIf|Q~;>N)8wSoQpZ4f_l@?bs}7}T<Xf&B%rSDvpOW)`p`3OtKyZukYx
zI}qsKmtDTUzlD6{^lVu&7_dur6SjciGpL|tbo4nZ8HKa6#?qZZ$Bok2C8ayV5jnb+
z)s^n-tD|;STe`E+x6D_%v$9dQY-;JwM&GiU(w&XIWv7?!Z1gRwF5TJaTQ;tAXQOYK
zw{&NVMmHKS+uvVS(Ag+16ricTtR~-7vZv=S`1W-fdo_;@^q+v6+1BT9t1{E!3hjgX
zz`!eztAuO6dB@lf=AR$tJH*y~u7G{f@8<g!SM~49oL=a9zrX(ox`JefI7gQ^RR^~9
z+jrOgr=kAcO1Pn628lXaeHRG~^bY|T7`T5A?gj^u5*XCrvtFPE27YNo+`m&B(0$4_
z-)5T+ybu^Tpe<f36lrNK!R|b%CH4fNe>=F=Ey2u5E!nICyZ>(74Gtm&T7sZcOV(=x
zZizPEW}AOOOYCFQKEFyF_;*(aww-}7LDN5kQ5Kl<V)iTfaREJj9NlfxyJKT@zI6WY
z{*1PEs0F4Ghe3{f>m5xT$Y9tsq8bP#oJ0Hj4}m5gjQ#y@jZA%;Hq}w;VQ)tyrYQUS
z50<Woqp$?U1EnkK5%$F~zFxXwNik9*(0gETyxl3kl=H`}&taFlZ<}N@Wfflx<a9Pa
zwyJ(&4~(kk_rWmR2O{}89yD8z@|6XKAX1J!jDd_`$X@>$4#Cog>@?u#;}{;}(Jzh>
zDS?5P0t0Uaw%z#g&tB5&7VJEkGV2ndU@Ybjb;VSzI!#^GF@MFvhR)?3ixuS;buQ^p
zKAqInor@NAEK@$JS~72O2W78YF~6ZnUEJ8%Xe(g3S=7y>{DP%RmUk>!ex0(?nPBMV
zCe=i_X4R;IxyZT*ovARoNZ1#R`$CDXM9i0?49{#CUOWXQpVkmdzoMEr-9NR-r{&zZ
z+9@INaXr;>l<FTB1(?RzyHl|BX^m3-bNeqm1)iluss3>qifNj?8}+tb`NpBh7`LY+
zEpGosC9z8<jkNt2mo8nD`DNQbqp0f0D@WS?#*w=yXz^v+-%?QR%Y&u19~Uc_X4$(@
zZ=wBKqg4Mq{zvVY1#m_JsZy1uTpG*PENMGJ|3oiIx<rz0QiThryI-9C+Wt$6@{8NS
zjLoOnIov$}H`Q|G(oNJC<%*N8$=ft;o9KR<5Bae<TKPgKmg6~6=F)fQF>4?nf}a;R
z0DJX~vpfO$@d(`tzp?h%8^mm0>N+S+fS;PD=d756`91k}?Lt(?jw+rVZ*3HX0~^Qc
z-~zzOD{5#dK%O0kH&vk;7Tg%JXUCq~oGc26eEnqIDrj!rl^cybJ9gWm=MAgVeugU$
zeQ0F#T_dCK92xz-k<qu0jQ;l{qu)I;`kf=AZyp)_#3p?ROFgO|mq;%#E($>Utip54
zMT6!~CCcXv6&W5cWJq=IZPIi+KbU@Sllz1o)O$9$*Fmjk$M#L`+jQn`uG-91$2U^d
z(T#bbLb(Dh)X+UZKIwEiP$c5lH&N)X79ssxk-B|F>h>0_!z++y$77q^cIK^3aCO5D
zQ)Oj(SM9CDQdoBz<}jo51rD!S-dwI)=kPjIlgs&Xxw>4gQRncWwB>T`Iu`=lKrVM}
zF1J$WywI7ebGcwH*OkkKR5^~RGW*)k*KUMxlurzSyn+>?ZckkbAZ>{mJBKYZ+k=-t
zyFHkjsx2_*%jIfSIbH|Ls$l~w0Cb1PUEeCks7YAXdAL@)T9ju(=VW&cjK>ybXFTHp
zyYxKQW#<9V2C<dZs>;eMDm`%5D6dkL=XpCPD^+1zPKEk0E?4Jd7hqnrIR88~1HiE$
zsZJ|rsVZB$a<a=ap|TRm<0iT;oG`g^ex>K!Dd$dfO&U{u7TmkeAgKv{*Og~uXjs!;
zv+-;+sj_`4RSjW)kBQn}<qT-&B#Z$(UIIUR$vb>T!8bUl9+q~&X;H4c>LNg0F4t!h
z#^Vmp75G8sTz%TOUFW*1<Vt#MuHc#AQf@f1?&*_Y@Al4xt>?S2Df3<f+j7iSXmpJC
z4(}aMa=DjJ(it~rJe(=xOgU#NI5UPbUe1i=%xRpd<jgqEjCWsV`#RIT6yuxl-3s??
z%v4plubSk|KyKoPu&I6&HZCB;&h4H%=~>uM^3K(S(~&UQAb3{-cosB!HJY4Lft@hb
z<-G&qt${35tg^M1;m+gMyE53hFG9fO^;LK;*F@|fxA##rjp(WhLfjX^0mwg3^3QDZ
zH>z;7Cz?qst2>%XXRJ)LFJfhSQ;BR(FI0wt$zUj&*+9>V@X3>Z<{V2K+Cuom$=}js
zLtXyXCb07R*9KGJU?yl`2_9sHtW=~slCm=B2A&?J8k+qr&9+S<6w0R3RxGhDl2TSC
z(w9u6f~gH?3dWWd?Mud@5QCKrrh+}GV6wN_3dS;^7E6Sz7U011D62ab?14tCO+>@^
z91C255Y&-+Hkkx<J7Rv|<!_;egd@pFJRFVpSc!Npz$Sl7qa9$1dng}UvyLsC?d#j1
zu$?)pnf{g*+o~_IHUe?R)GgUy%t}XZji?3saaj|D>~HclH#WC4HaE8U>LTkQHt6<v
zCK#*tHS}e&@yO*pkvM=MC<arZ-pkjwwKlZ2_!@e8!d<?GrO+=)3%n++F6iuRJRa<e
z=yqqKAq)CG8tjTitfr=7mCeN}XBMk$$u)PDzopG?E+5wxe@m;46p5>dc(JH3s9-1*
zNvEUOyksf?!=cYgCZcf|4ryyvTM^+|Me16M)XgqZSIplWu;a4;hD#BZraAoR)o-6X
zPRA4ay};SfB+dqO6wGAcJkrl{oBbN_x9T$~KYVBE;j0Ix9=-Yu?T$ubVK_sh@n|L*
zjHy^;Z6u~}WU0)CWCR*epzmW*xMo1VC%U`S5jeYHBzGrLeO6>WoUp-gI0Xl*c;oRD
z&&F?#C)UL+OExea31y;*xYasKG!P<JI#7BFZRtnQMLM^+SkE^%iRa;P!q5D|ky~sO
zHMK(col82Gcg|bX`Hc?i+GR@@E}OSlL|^>yHWeFcO>H7nxXR47LxpQ1TsKrQ8p>o-
z5kZ0L>nxjMU)|DpZKDHXCAyV-%P^xi(HEJ~mFSw0iX;>189kv;gYH+%&9HOb!DtLT
zq-T(!`cg*HtIVr~3l?1Jt6R8W>HMXOd~}7Z3rD)LJw13StFLF!;j#&{i_>Wq;<|O2
za;>j+O&K@FyB+2lwSZ5hIz4BZH=+72_k!^ifvq0TZR3DNl@2?cu9T?{^t(ut;&FHu
z<*_H5CLK_IDm}c)12ZNw;p;S)&|%99G>#KmJB4ZA278yPP@AdD__c&{sEqe8U(d&2
z_D^=VGoL18jDLsu2L3qn^=vt>^D6TV{B7o!K?V}*e+qdWzk#0t@gdG##QaML-%MS{
zc!2rTMU3CTd;?#@eEqy9AI~k!H}Lg<V?+&Oai353Ip9Ade9++kj{`mx`d7D?#wEv(
zo;=tOMrzRf{K(R>z?q}*vRuD0-a+_bsKUg<KT7yf10N*(xPd=T_{Rp0nx330mh#DC
zKM2bMl=CPY?I$OX(oerms_>|jpDrGRcqT#5apLvK9{@j@4QpHnd<u-$Li{Tn@V{}u
zlMeW|9PkGn@FyMc-#FkOI^bn+oC>w;D-L+G1K#O?haB+R9PoYz{GT20eGd3<9PoD?
z@J}4@a=4BZ>Yqvne4+#1;DC2H;FbeE>=s>kb!Iiqvh+>Tio)bhFXv_{tEr8^STr8t
z)f(cnEt;jn+KLu8vjrWedc2YwPR}jYkUodh)7dW6vFA*)ESSU!2f1~SX_1?km=?K(
zgK3eQ?3fn0#Rph4H&axh1gr((nKUo%pdtBrFD)tafW3|j+7o12yjnQ%go(C24Tg0a
zFEn84sn?**jfJP-1uR-|dCG#kj?GVOiz_zgC;P&rwH2-MO|a+k^zDXTK*+g&p-9c;
zv*6_Yh*>MnxdkV;3^x}Zz&WYUgbYr8?N3K&(r#HjJr;CM2JB${7KdeWC=rh6b%d_U
zMAl~jim!#m9j*jmMV(4T!x4xEEr|?cx+j|oW}>j(1~M#s;P4X#1LDJn-IB@KW>YY6
z4sC#ic~4x&O%@mqFD&)ihkQxC5Ql{lju2jQQ%z4S(G`rPEts5(J_!pK)KgY^T{IKw
z1^ZZ*LyM-ZP%s{fz&AEzkW5Fi;RHNFfjNHMN@ml&RFREGZ^_!@(~2@%KX)N6b`gt!
z89p(AUN)k|gQ5p^Uj(13gc4a;QS?RnLdgwe8-x`%bd!$K>P{v4>><X=!@}!IByNUh
z7B^F+TnHBAClg7+!_jmy7G$4kc<>Za>r!xKQ=wQQ&FzS+4@HuCVF*u>B33-x*M-lG
z^oYpU^#<c%rw;6n<$Dmk8=aEo`NK~r1JeXO3qJuLKw^5?z(2O(&)*^(ZZE1He$0PQ
z;P_0G@s9+4vA`>73WGZM?3MXA55|Oe1N<1DN;t*|w~`!QFZh0eHyV7N|IHWt8G_#_
z__&T*4nIsW1Lt_s0>@Z+?RBfb5o7)qfg`^bewgky@H!h-j~F=X|A=tZXoMf@KPC9c
zJxDsgGw_Xs9~L-jts?w?1&%t*e_!Cp4-^0Y47`_ce(H_KOX}mi9}{9S{tF1l9r|5P
zx>p<c38=%gSm3C&OQT>XaMWS`HwBLT-Nf%Q@I8cYG;r1*Al!_9yWpeWgB1Ud4SXZv
z&k7v14w2s%1dck)e^ubfKSKOB4E!kJ#|)hHKO)?W|IdPtez_lgFwe$>)rg;<_@@gT
zwfOw>3taMN2^{&gq%+sR>j=Nzz*#>;xEcQ%!AHNiPQo;3;Cx)~6F6$EBEPsk!Nl!l
z{v!fMewg^*H}GD<UovpkKR~z{|C@rZ`=8368u$rnmkR|TVG*;t$gfx6y8nq^C2-8{
zCjOZQzK8He184oq3CEp0f3FgJ-TxGKkAZI_JT7p|9wNV4fuj!dHwqlHM~J`Gz>gCC
zkb$%QzY>l+8UN#gult|M2MzoL#s41y$Lv(<=l>SC?tkJR6F6pTiO<g)_&C-P4sSqp
zVx0BQA{;ej{9hG(-T&l|Kh{AV-JgWxn_o<<zl!|oPYei`{Ob*VnD{pucrW4W44n1v
zB;1VO{)317dAFQ+KNLE;KPmnv1&+`z^1D~ylK+yxk-wYxKR56_gdZ_**8hNTGyabS
zAN?Mr@)UZMg|fOo2|r)psC9_^)(c$n8wHO1BgCI=;71Anx`DI)O@y2A;~(5&;y9O6
z`ECQ(-%J4S+X6?esWi^N=YT&!xas#9!Posp<wFK;f48F4+X6?eRpj>*2fTuwYnpz?
z5svL`f*;SL&Jp}(f%^<T&xiejKU46(DRBHYmi2EII{3{h<7*x8O#*KP{--n#zf0iQ
zZzrhz_d4JY6OR2bTloEv;N!D(j%U0V3XqUL2Y!rCA)Lnv`<?56cM6?Lh0e7Ge<Q`Q
z$^nlG9U1=y!I$yBDflw}cLZObU*xxfo?COfIG)LbV?W6F&lY_2%j03X;9n-%+bH;R
z1%9>QUoP;~4*aza{Oy8|?OIOl{IP+bp!Pm1aBSNyI*(ouIO^1r&Z`1P{%+#GVc>fR
zKW5;p{}JJ+A@5%k_2;7b>kr3SBXG1iMEd6nT*f&~;K)Bh{00L*N_dBXv;H!|QR52u
z@%Rr3KKkYHzeeC_GZi<GZV|ZTuNOE{Yl(lmf!7iKfPu6AZo-i!<9t%^uY@{|f3LvN
zW)<nbByh?9xxkScCjPGsyqEA}2G05)5sow&=NR}L3zK=?O%OQR>>~X$1djd5=P7<q
zh6#0$x|{eH82BE-FEen~4-k$t8Rs_yA8+B*92FJ(cEGux?-ckvf&ZP*nGZN$H|`Vo
z0)amwbgmLQ-xqwmFR<UA3Vw&cUlx3M-#Orbzb){&Lgy2qFRxdV=|gbrf61>W9Q#x9
zuNJs$*J7a~+tnrbvRzTZm+i_p;1GsRxJ<y9d^8`cv0?pY4WVi(`wV;vm3JCAjzvsE
zdW-Ki?dMd?-(%p@sr;D0Sp%UOTF0;sKHI|NGjP`Dbu;t%?_u~k7~)bN|1S(C=HopT
z(~yC){$m1{IyHE}A+b&_P6KBhUf(c37pLG${hb2G<1$}+gE$SG^?Clz`b&uanBYr&
z`-|8D@zec*by&a7z;p2nT<Y%>IL5z><2P{D=ldu7&BZVHQojZVF(l^a`rp7=pYJEk
z&&4nJQh%qwG5(vhH|T!@XMMiDvVJap!I%0qC<=-Bx%ds7_3I2g7r(%z{!W2oc8&H1
z@f$enKPGUg!=EHzoOmdxIjV-{-5mc0()SrS>(?3h7UFLfxYnjPb_yJ!t;8QPaMs^r
z;M<5_L-Rh46aTme6R&F+XPr8O|81MDb{hBtgbx`w>+CUb*5OYl&@Z<40Ci{$%{Muo
ze<XdMfwO*{f&UZn3D)=NTEcM0Utr+<dm8-sc|CpujtTMUI%jXrqCDetTT$#E<D^TA
zW?n4#7g8Q~IM>C*e%q+MxTe6w{a}~iPoXHo{2j#acEJDE!1q#6{e-hV_sc&R{Qac=
zpy11PJz?-)K|x5*+q+!5UL*V$2G0HXCgDh<OPWRw6VB~DMCCskIL{|PH}GBxb}aeF
z9X5&2w@HMv{+-01YVd36{JGHJlRGs-@a6TP&ESW~fZsP^HOAwk^P1mpa6EiJyGiJ4
zKI!xr`Zzbjgx_yr!X3u58Ge|y8vG&Z>_Ndt{nbc@^c{n5|NR17Ck0=(mV{Qso>
z+$;E~KZN3tUN-ohHmu$dd>ucP|6uSxA^mp+AN3ED&YukaZG`_t@OAv8Q%!sB|1+q6
z&LJGlP~S)P{C<l06X-bNcWIcArsJpbm4<#3>30gg?tju>X7E=KzDn?Q{G<~%_=^c&
zFZjCuNoR|}KSc3w6MP*%={#icGbje>Uj!ea!=%siEAF4`iO27`kf!4&o!1Th1Ells
zhQ5!=|7Gx>q4@bd7wc~({m%^kA4$KQ+J{A?t|s0D!a4q{2$%Ci9Y6WK$l#ww{1!u>
z&+E$#{%7DD(?Y@5{ZINg82ss^&+orD{=<aF4E_gHUTf$px*y+e@K@R4r~!k&nfUh_
z{D+9o&vm%}d7kt=gU|2Vo;L9Fsl6`>zj$1HRDR9i&!OY^Tfx`;M%V4%8~k^u%>BW~
z_e%2nnb6VWfy(1)95H_t@vk@Vy~JN_;Qan+je-A=`i;*g*8iAv@H;|Gx&EXZ_O}e3
zDDin-z~h1EQTTl!Cf2{5;{Sor$1L9$UN!i;i2rMYf0+CpG5G5Uf8XHysH{kj<Kg#e
z{GN;B=YE`O@IN4(X@oO>i14cnKKIMl9PniZKACj*ICGrWq9aJ%2EW0ERnov$kj||J
z?kAkzf3ZHlC%VVrbHDNWh55fA-XjK|=QocU_;D&fW#HQ>{(T1iKH>acjQ#R)=Xe>P
zN$vW*p~LIUqXy2;RX#NEChF%hI*(bOk7K0+&hOEfe+$KbiNSw?;%qhWv4po9c#`6|
z#=w6~`uu*3{qp>b->)(L8MU+5(7A^6Z#8gkFTwi!y?}h;j{6VI>C&%j&)3`h`eh!K
zFEQ}7RK|B+m@rOU@7#d}NcgS<6YD=|7nP6p=u`St{`7{vOc4G+FP%x*`(DnaBC((!
zKW|ii{Rde7u5?=YQwh7EYccDGoL_&l2bE|-AN$6;6JUsc9b*N%x>Av~!>ZxWB;!31
z)XSUTr@(9iL2wpf_?8dKp+q141)}oD6PbvA;gS^%`Y*^xB+?6?{o!ANor2^84eUcc
zjx5<u8UAjcapcN`>q{J(?Gl81FTRw7bbOM%KLd7X%j-IRjya8Rx-8pd*uG8+SQ?f&
zoKAyW8OIH3n)Zjup3g5f@NtIrIKD8hVPgf#Y|raSqH8YaagWd5(cbhwL<{&ZHyFu~
ze0rPT;5aVSe=9p|4qunB|L_>G9QWUKfT4dgm7QrL4;ly7<l=L$LjK#oX4~(henkK1
z+w^Y%W@@74!+H{`)UU80lF3a$orxhm`4!uUpGVlGlev9RQ7C@3a=1OlkFNyG`0oO&
zkpCg_KV(!IMYRR&3;Ay(|Er-M6Z*#?Vfw!pFw`{L*?um7kSZLGAIE|7+d}qNU#QL1
zJ@ziQWjo&gz`_0?+0V~e+8MUv{ZnLb(A1gJOk}t{*S-cB)H2V%8nSO^BJH{V7=8sZ
zh5COx^*^5{*#G$KjO`gO<QuhDlK<@$SW*g4r#kqV_V}9EJof=oNAbc0X@hYA<9@Si
U;a@yJrjY#}ivPDvq`hhX|3Fj{dH?_b
diff --git a/gcc/cobol/failures/twocall/twocall.cbl b/gcc/cobol/failures/twocall/twocall.cbl
deleted file mode 100644
index 822c91fa81f1..000000000000
--- a/gcc/cobol/failures/twocall/twocall.cbl
+++ /dev/null
@@ -1,33 +0,0 @@
- identification division.
- program-id. caller.
- data division.
- working-storage section.
- 01 aa pic 9(16) comp-5 value 4321.
- 01 bb pic 9(16) comp-5 value 8765.
- procedure division.
- display "I am program caller"
- call "called_c" using by value aa
- goback.
- end program caller.
-
- identification division.
- program-id. called_cobol.
- data division.
- working-storage section.
- 01 p pointer.
- linkage section.
- 01 a pic 9(16) comp-5.
- 01 b pic 9(16) comp-5.
- procedure division using by reference a by reference b.
- set p to address of a
- display p
- set p to address of b
- display p
- display "address of a " address of b
- display "address of b " address of b
- display "called in cobol by reference " a space b
- goback.
- end program called_cobol.
-
-
-
diff --git a/gcc/cobol/parse.y b/gcc/cobol/parse.y
index 8636695f80bf..d06b167d3651 100644
--- a/gcc/cobol/parse.y
+++ b/gcc/cobol/parse.y
@@ -12,7 +12,6 @@
* in the documentation and/or other materials provided with the
* distribution.
* * Neither the name of the Symas Corporation nor the names of its
- * * Neither the name of the Symas Corporation nor the names of its
* contributors may be used to endorse or promote products derived from
* this software without specific prior written permission.
*
diff --git a/gcc/cobol/tests/.gitignore b/gcc/cobol/tests/.gitignore
index 7782b432bb52..c29f5923e7c3 100644
--- a/gcc/cobol/tests/.gitignore
+++ b/gcc/cobol/tests/.gitignore
@@ -6,3 +6,4 @@ under-test.txt
*.o
*.nodes
*.nodes.html
+*.json
--
GitLab