开云体育

Single Messages Topics Expanded Polls

Re: Possible bug in BREXX parse instruction

Mike Gro?mann All Messages By This Member #4366 开云体育 Bob, did you came closer to a c file, where the problem may occur? I just reviewed my old mail, but can’t really remember. Something with not finding the closing ?)“. Where do you think is the bug, I will review the code. Mike ? toggle quoted message Show quoted text Am 16.10.2022 um 19:18 schrieb Bob Bolch <Bob@...>: Yes. The problem is that BREXX doesn't handle literals in the parse template!! I just don't know enough C to find and fix it. Bob Bolch On Sun, Oct 16, 2022, 12:46 PM Martin Scheffler <San-Lorenzo@...> wrote: Comparing with results from real iron (z/VM 6.4): Ready; T=0.01/0.01 10:46:48?????????????????????????????????????? ? ?DAVEMTST???????????????????????????????????????????????????????? ? z/VM Version 6 Release 4.0, service level 1701 (64-bit)?????????? ? Generated at 04/24/17 16:30:42 EST??????????????????????????????? ? IPL at 10/08/22 07:37:33 EST????????????????????????????????????? ? CMS Level 28, Service Level 1701????????????????????????????????? ? REXX370 4.02 01 Dec 1998????????????????????????????????????????? ? test of () trial 1??????????????????????????????????????????????? ? in1 = //????????????????????????????????????????????????????????? ? in2 = //????????????????????????????????????????????????????????? ? outer=/ trial 1/????????????????????????????????????????????????? ? test of (1) trial 2?????????????????????????????????????????????? ? in1 = /1/???????????????????????????????????????????????????????? ? in2 = //????????????????????????????????????????????????????????? ? outer=/ trial 2/????????????????????????????????????????????????? ? test of (1 3) trial 3???????????????????????????????????????????? ? in1 = /1/???????????????????????????????????????????????????????? ? in2 = /3/???????????????????????????????????????????????????????? ? outer=/ trial3/?????????????????????????????????????????????????? ? Ready; T=0.01/0.01 10:46:51?????????????????????????????????????? ? ????????????????????????????????????????????????????????????????? ? ????????????????????????????????????????????????????????????????? ? Written new file: DAVEMTST EXEC A1??????????????????????????????? ? Ready; T=0.09/0.23 15:58:32?????????????????????????????????????? ? DAVEMTST????????????????????????????????????????????????????????? ? SYSTEM 4381-A???????????????????????????????????????????????????? ? VM/370 Community Edition Version? 1 Release? 1.2 10/11/22 08:44:05? VM/370 CMS Community Edition Version 1 Release 1.2??????????????? ? CMS bREXX 1.0.1 Jul? 5 2022?????????????????????????????????????? ? test of () trial 1??????????????????????????????????????????????? ? in1 = /)/???????????????????????????????????????????????????????? ? in2 = /trial 1/?????????????????????????????????????????????????? ? outer=//????????????????????????????????????????????????????????? ? test of (1) trial 2?????????????????????????????????????????????? ? in1 = /1)/??????????????????????????????????????????????????????? ? in2 = /trial 2/?????????????????????????????????????????????????? ? outer=//????????????????????????????????????????????????????????? ? test of (1 3) trial 3???????????????????????????????????????????? ? in1 = /1/???????????????????????????????????????????????????????? ? in2 = /3/???????????????????????????????????????????????????????? ? outer=/ trial3/?????????????????????????????????????????????????? ? Ready; T=0.08/0.12 15:58:38?????????????????????????????????????? ? ????????????????????????????????????????????????????????????????? ? *** side by side:???????????????????????????????????????????????? ? ????????????????????????????????????????????????????????????????? ? REXX370 4.02 01 Dec 1998? CMS bREXX 1.0.1 Jul? 5 2022???????????? ? test of () trial 1??????? test of () trial 1????????????????????? ? in1 = //????????????????? in1 = /)/?????????????????????????????? ? in2 = //????????????????? in2 = /trial 1/???????????????????????? ? outer=/?trial 1/????????? outer=//??????????????????????????????? ? test of (1) trial 2?????? test of (1) trial 2???????????????????? ? in1 = /1/???????????????? in1 = /1)/????????????????????????????? ? in2 = //????????????????? in2 = /trial 2/???????????????????????? ? outer=/?trial 2/????????? outer=//??????????????????????????????? ? test of (1 3) trial 3???? test of (1 3) trial 3?????????????????? ? in1 = /1/???????????????? in1 = /1/?????????????????????????????? ? in2 = /3/???????????????? in2 = /3/?????????????????????????????? ? outer=/ trial3/?????????? outer=/ trial3/???????????????????????? ? ????????????????????????????????????????????????????????????????? ? ?DAVEMTST EXEC???? A1? F 80? Trunc=80 Size=22 Line=11 Col=1 Alt=0 ? ====>???????????????????????????????????????????????????????????? ? ????0 * * * Top of File * * ???????????????????????????????????? ? ????1 / test parse /??????????????????????????????????????????? ? ????2 "q cplevel"???????????????????????????????????????????????? ? ????3 "q cmslevel"??????????????????????????????????????????????? ? ????4 parse version v???????????????????????????????????????????? ? ????5 say v?????????????????????????????????????????????????????? ? ????6?? trest = '() trial 1'????????????????????????????????????? ? ????7?? say 'test of () trial 1'????????????????????????????????? ? ????8?? s = dotell(trest)???????????????????????????????????????? ? ????9?? trest = '(1) trial 2'???????????????????????????????????? ? ???10?? say 'test of (1) trial 2'???????????????????????????????? ? ???11?? s = dotell(trest)???????????????????????????????????????? ? ???12?? trest = '(1 3) trial3'??????????????????????????????????? ? ???13?? say 'test of (1 3) trial 3'?????????????????????????????? ? ???14?? s = dotell(trest)???????????????????????????????????????? ? ???15?? exit????????????????????????????????????????????????????? ? ???16???????????????????????????????????????????????????????????? ? ???17 dotell:???????????????????????????????????????????????????? ? ???18?? parse arg with '(' in1 in2 ')' outer????????????????????? ? ???19?? say 'in1 = /'in1'/'?????????????????????????????????????? ? ???20?? say 'in2 = /'in2'/'?????????????????????????????????????? ? ???21?? say 'outer=/'outer'/'???????????????????????????????????? ? ???22?? return 0????????????????????????????????????????????????? ? ???23 * * End of File * * *???????????????????????????????????? ?

View All 49 Messages

#4366

Join [email protected] to automatically receive all group messages.