Skip to content

Commit 2e490b0

Browse files
ytr-sakamotoytr-sakamoto
committed
文字の比較処理を修正した.
1 parent 3f66b92 commit 2e490b0

File tree

2 files changed

+94
-94
lines changed

2 files changed

+94
-94
lines changed

‎libcobj/src/jp/osscons/opensourcecobol/libcobj/common/CobolUtil.java‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -504,8 +504,8 @@ public static int commonCmpc(CobolDataStorage s1, byte c, int size) {
504504
int uc = c & 0xFF;
505505
if(s != null) {
506506
for(int i=0; i<size; ++i) {
507-
508-
int ret = s.getByte((s1.getByte(i) & 0xFF) - (s.getByte(uc) & 0xFF));
507+
//int ret = s.getByte((s1.getByte(i) & 0xFF) - (s.getByte(uc) & 0xFF));
508+
int ret = (s.getByte(s1.getByte(i) & 0xFF) & 0xFF) - (s.getByte(uc) & 0xFF);
509509
if(ret != 0) {
510510
return ret;
511511
}

‎tests/cobol85/report.pl‎

Lines changed: 92 additions & 92 deletions
Original file line numberDiff line numberDiff line change
@@ -71,101 +71,101 @@
7171

7272
# 短時間で実行が終了しないため一時的にskip
7373

74-
$skip{NC101A} = 1;
75-
$skip{NC102A} = 1;
76-
$skip{NC103A} = 1;
77-
$skip{NC104A} = 1;
78-
$skip{NC105A} = 1;
79-
$skip{NC106A} = 1;
80-
$skip{NC107A} = 1;
81-
$skip{NC108M} = 1;
82-
$skip{NC109M} = 1;
83-
$skip{NC110M} = 1;
84-
$skip{NC111A} = 1;
85-
$skip{NC112A} = 1;
86-
$skip{NC113M} = 1;
87-
$skip{NC114M} = 1;
88-
$skip{NC115A} = 1;
89-
$skip{NC116A} = 1;
90-
$skip{NC117A} = 1;
91-
$skip{NC118A} = 1;
92-
$skip{NC119A} = 1;
93-
$skip{NC120A} = 1;
94-
$skip{NC121M} = 1;
95-
$skip{NC122A} = 1;
96-
$skip{NC123A} = 1;
97-
$skip{NC124A} = 1;
98-
$skip{NC125A} = 1;
99-
$skip{NC126A} = 1;
100-
$skip{NC127A} = 1;
101-
$skip{NC131A} = 1;
102-
$skip{NC132A} = 1;
103-
$skip{NC133A} = 1;
104-
$skip{NC134A} = 1;
105-
$skip{NC135A} = 1;
106-
$skip{NC136A} = 1;
107-
$skip{NC137A} = 1;
108-
$skip{NC138A} = 1;
109-
$skip{NC139A} = 1;
110-
$skip{NC140A} = 1;
111-
$skip{NC141A} = 1;
112-
$skip{NC170A} = 1;
113-
$skip{NC171A} = 1;
114-
$skip{NC172A} = 1;
115-
$skip{NC173A} = 1;
116-
$skip{NC174A} = 1;
117-
$skip{NC175A} = 1;
118-
$skip{NC176A} = 1;
119-
$skip{NC177A} = 1;
120-
$skip{NC201A} = 1;
121-
$skip{NC202A} = 1;
122-
$skip{NC203A} = 1;
123-
$skip{NC204M} = 1;
124-
$skip{NC205A} = 1;
125-
$skip{NC206A} = 1;
126-
$skip{NC207A} = 1;
127-
$skip{NC208A} = 1;
128-
$skip{NC209A} = 1;
129-
$skip{NC210A} = 1;
130-
$skip{NC211A} = 1;
131-
$skip{NC214M} = 1;
132-
$skip{NC215A} = 1;
133-
$skip{NC216A} = 1;
74+
#$skip{NC101A} = 1;
75+
#$skip{NC102A} = 1;
76+
#$skip{NC103A} = 1;
77+
#$skip{NC104A} = 1;
78+
#$skip{NC105A} = 1;
79+
#$skip{NC106A} = 1;
80+
#$skip{NC107A} = 1;
81+
#$skip{NC108M} = 1;
82+
#$skip{NC109M} = 1;
83+
#$skip{NC110M} = 1;
84+
#$skip{NC111A} = 1;
85+
#$skip{NC112A} = 1;
86+
#$skip{NC113M} = 1;
87+
#$skip{NC114M} = 1;
88+
#$skip{NC115A} = 1;
89+
#$skip{NC116A} = 1;
90+
#$skip{NC117A} = 1;
91+
#$skip{NC118A} = 1;
92+
#$skip{NC119A} = 1;
93+
#$skip{NC120A} = 1;
94+
#$skip{NC121M} = 1;
95+
#$skip{NC122A} = 1;
96+
#$skip{NC123A} = 1;
97+
#$skip{NC124A} = 1;
98+
#$skip{NC125A} = 1;
99+
#$skip{NC126A} = 1;
100+
#$skip{NC127A} = 1;
101+
#$skip{NC131A} = 1;
102+
#$skip{NC132A} = 1;
103+
#$skip{NC133A} = 1;
104+
#$skip{NC134A} = 1;
105+
#$skip{NC135A} = 1;
106+
#$skip{NC136A} = 1;
107+
#$skip{NC137A} = 1;
108+
#$skip{NC138A} = 1;
109+
#$skip{NC139A} = 1;
110+
#$skip{NC140A} = 1;
111+
#$skip{NC141A} = 1;
112+
#$skip{NC170A} = 1;
113+
#$skip{NC171A} = 1;
114+
#$skip{NC172A} = 1;
115+
#$skip{NC173A} = 1;
116+
#$skip{NC174A} = 1;
117+
#$skip{NC175A} = 1;
118+
#$skip{NC176A} = 1;
119+
#$skip{NC177A} = 1;
120+
#$skip{NC201A} = 1;
121+
#$skip{NC202A} = 1;
122+
#$skip{NC203A} = 1;
123+
#$skip{NC204M} = 1;
124+
#$skip{NC205A} = 1;
125+
#$skip{NC206A} = 1;
126+
#$skip{NC207A} = 1;
127+
#$skip{NC208A} = 1;
128+
#$skip{NC209A} = 1;
129+
#$skip{NC210A} = 1;
130+
#$skip{NC211A} = 1;
131+
#$skip{NC214M} = 1;
132+
#$skip{NC215A} = 1;
133+
#$skip{NC216A} = 1;
134134
#$skip{NC217A} = 1;
135135
#$skip{NC218A} = 1;
136-
$skip{NC219A} = 1;
137-
$skip{NC220M} = 1;
138-
$skip{NC221A} = 1;
139-
$skip{NC222A} = 1;
140-
$skip{NC223A} = 1;
141-
$skip{NC224A} = 1;
142-
$skip{NC225A} = 1;
143-
$skip{NC231A} = 1;
144-
$skip{NC232A} = 1;
145-
$skip{NC233A} = 1;
146-
$skip{NC234A} = 1;
147-
$skip{NC235A} = 1;
148-
$skip{NC236A} = 1;
149-
$skip{NC237A} = 1;
150-
$skip{NC238A} = 1;
151-
$skip{NC239A} = 1;
152-
$skip{NC240A} = 1;
153-
$skip{NC241A} = 1;
154-
$skip{NC242A} = 1;
155-
$skip{NC243A} = 1;
156-
$skip{NC244A} = 1;
157-
$skip{NC245A} = 1;
158-
$skip{NC246A} = 1;
136+
#$skip{NC219A} = 1;
137+
#$skip{NC220M} = 1;
138+
#$skip{NC221A} = 1;
139+
#$skip{NC222A} = 1;
140+
#$skip{NC223A} = 1;
141+
#$skip{NC224A} = 1;
142+
#$skip{NC225A} = 1;
143+
#$skip{NC231A} = 1;
144+
#$skip{NC232A} = 1;
145+
#$skip{NC233A} = 1;
146+
#$skip{NC234A} = 1;
147+
#$skip{NC235A} = 1;
148+
#$skip{NC236A} = 1;
149+
#$skip{NC237A} = 1;
150+
#$skip{NC238A} = 1;
151+
#$skip{NC239A} = 1;
152+
#$skip{NC240A} = 1;
153+
#$skip{NC241A} = 1;
154+
#$skip{NC242A} = 1;
155+
#$skip{NC243A} = 1;
156+
#$skip{NC244A} = 1;
157+
#$skip{NC245A} = 1;
158+
#$skip{NC246A} = 1;
159159
#$skip{NC247A} = 1;
160-
$skip{NC248A} = 1;
161-
$skip{NC250A} = 1;
162-
$skip{NC251A} = 1;
163-
$skip{NC252A} = 1;
164-
$skip{NC253A} = 1;
165-
$skip{NC254A} = 1;
166-
$skip{NC302M} = 1;
167-
$skip{NC303M} = 1;
168-
$skip{NC401M} = 1;
160+
#$skip{NC248A} = 1;
161+
#$skip{NC250A} = 1;
162+
#$skip{NC251A} = 1;
163+
#$skip{NC252A} = 1;
164+
#$skip{NC253A} = 1;
165+
#$skip{NC254A} = 1;
166+
#$skip{NC302M} = 1;
167+
#$skip{NC303M} = 1;
168+
#$skip{NC401M} = 1;
169169

170170

171171
#$skip{SQ101M}=1;

0 commit comments

Comments
 (0)