[Info-vax] Native Pascal compiler for VMS x86-64 in test field test now
Jonathan
jtcegh at gmail.com
Mon May 15 16:17:56 EDT 2023
On Friday, May 12, 2023 at 5:20:14 PM UTC-4, John Reagan wrote:
> On Friday, May 12, 2023 at 2:48:42 PM UTC-4, Jonathan wrote:
> > On Thursday, May 11, 2023 at 8:25:22 PM UTC-4, Arne Vajhøj wrote:
> > > On 5/11/2023 11:41 AM, John Reagan wrote:
> > > > On Wednesday, May 10, 2023 at 4:38:39 PM UTC-4, Jonathan wrote:
> > > >> Any chance we're going to get /noseparate compilation with the
> > > >> Basic compiler? We're going to have to do some (a lot of?) work if
> > > >> this isn't available. (It stopped working after HP v1.7 Basic
> > > >> compiler.)
> > > >
> > > > /NOSEPERATE is the default. Do you mean /SEPARATE? Yes, I have a
> > > > bug report that it stopped working on the latest BASIC on Itanium.
> > > I cannot recreate with a trivial example. There must be something
> > > extra needed.
> > >
> > > Basic 1.8 on Alpha:
> > >
> > > $ type ex.bas
> > > program ex
> > >
> > > external sub s1
> > >
> > > call s1
> > >
> > > end program
> > > !
> > > sub s1
> > >
> > > external sub s2
> > >
> > > call s2
> > >
> > > end sub
> > > !
> > > sub s2
> > >
> > > print "Hi from Basic!"
> > >
> > > end sub
> > > $ bas ex
> > > $ lin ex
> > > $ run ex
> > > Hi from Basic!
> > > $ libr/obj/crea ex
> > > $ libr/obj/ins ex ex
> > > $ libr/obj/list/name ex
> > > Directory of ALPHA OBJECT library DISK2:[ARNE]ex.OLB;2 on 11-MAY-2023
> > > 20:14:08
> > > Creation date: 11-MAY-2023 20:14:08 Creator: Librarian A09-32
> > > Revision date: 11-MAY-2023 20:14:08 Library format: 3.0
> > > Number of modules: 1 Max. key length: 128
> > > Other entries: 3 Preallocated index blocks: 213
> > > Recoverable deleted blocks: 0 Total index blocks used: 2
> > > Max. Number history records: 20 Library history records: 1
> > >
> > > Module ex
> > > EX
> > > S1
> > > S2
> > >
> > > $ bas/sep ex
> > > $ lin ex
> > > $ run ex
> > > Hi from Basic!
> > > $ libr/obj/crea ex
> > > $ libr/obj/ins ex ex
> > > $ libr/obj/list/name ex
> > > Directory of ALPHA OBJECT library DISK2:[ARNE]ex.OLB;3 on 11-MAY-2023
> > > 20:14:08
> > > Creation date: 11-MAY-2023 20:14:08 Creator: Librarian A09-32
> > > Revision date: 11-MAY-2023 20:14:08 Library format: 3.0
> > > Number of modules: 3 Max. key length: 128
> > > Other entries: 3 Preallocated index blocks: 213
> > > Recoverable deleted blocks: 0 Total index blocks used: 2
> > > Max. Number history records: 20 Library history records: 1
> > >
> > > Module EX
> > > EX
> > >
> > > Module S1
> > > S1
> > >
> > > Module S2
> > > S2
> > >
> > > Basic 1.8 on Itanium:
> > >
> > > $ type ex.bas
> > > program ex
> > >
> > > external sub s1
> > >
> > > call s1
> > >
> > > end program
> > > !
> > > sub s1
> > >
> > > external sub s2
> > >
> > > call s2
> > >
> > > end sub
> > > !
> > > sub s2
> > >
> > > print "Hi from Basic!"
> > >
> > > end sub
> > > $ bas ex
> > > $ lin ex
> > > $ run ex
> > > Hi from Basic!
> > > $ libr/obj/crea ex
> > > $ libr/obj/ins ex ex
> > > $ libr/obj/list/name ex
> > > Directory of ELF OBJECT library DISK1:[ARNE]ex.OLB;2 on 11-MAY-2023 20:18:05
> > > Creation date: 11-MAY-2023 20:18:05 Creator: Librarian I01-42
> > > Revision date: 11-MAY-2023 20:18:05 Library format: 6.0
> > > Number of modules: 1 Max. key length: 1024
> > > Other entries: 3 Preallocated index blocks: 213
> > > Recoverable deleted blocks: 0 Total index blocks used: 2
> > > Max. Number history records: 20 Library history records: 1
> > >
> > > Module ex
> > > EX
> > > S1
> > > S2
> > >
> > > $ bas/sep ex
> > > $ lin ex
> > > $ run ex
> > > Hi from Basic!
> > > $ libr/obj/crea ex
> > > $ libr/obj/ins ex ex
> > > $ libr/obj/list/name ex
> > > Directory of ELF OBJECT library DISK1:[ARNE]ex.OLB;3 on 11-MAY-2023 20:18:05
> > > Creation date: 11-MAY-2023 20:18:05 Creator: Librarian I01-42
> > > Revision date: 11-MAY-2023 20:18:05 Library format: 6.0
> > > Number of modules: 3 Max. key length: 1024
> > > Other entries: 3 Preallocated index blocks: 213
> > > Recoverable deleted blocks: 0 Total index blocks used: 2
> > > Max. Number history records: 20 Library history records: 1
> > >
> > > Module EX
> > > EX
> > >
> > > Module S1
> > > S1
> > >
> > > Module S2
> > > S2
> > >
> > > Arne
> > It is, weirdly, triggered by the specific length of the source file path after logical evaluation. I have a reproducer, if you're interested.
> Absolutely. Back when I first saw the report, I tried to find the edit that caused the regression. The only that could have been at fault
> seemed fine (stupid, but fine) to me. Maybe this one will trigger something. Post here or email to me at some guessable email account.
I sent to the (I hope) guessable email account.
Jonathan
More information about the Info-vax
mailing list