We are working on a project that is attempting to share a common code base between AREV and OI, meaning the same table as well…not just a duplicate copy. Obviously, however, object code is stored in two different places for each system.

This code checks @USER3 to see what environment this code is running under and then branches to the appropriate command, for instance:

If @USER3 EQ "AREV" then

Execute "PC EXIT MD TEST"

end else

* Must be running under OI

rv=Utility("MAKEDIR", "TEST")

end

This compiles fine in AREV but OI doesn't like the Execute line. Is there a way to get OI to compile anyways since it will never have to run this line?

Thanks,

dbakke@srpcs.com

SRP Computer Solutions

I know this is a cop out but in Arev call MkDir….

Or Call a subroutine that doesn't exist in OI…

amcauley@sprezzatura.com

Sprezzatura Ltd

World Leaders in all things RevSoft

Don,

In the OI BASIC+ code, you will often find:

#define AREV

#ifdef REVENG

#undefine AREV

#endif

.. then

#ifdef REVENG

…

#endif

and

#ifdef AREV

…

#endif

I don't know if the compiler defines REVENG by default or if that was part of the build system.

There is a subroutine:

rev_compiler(source, nolinemarks, recompile, ifdeflist)

source - pass the source record as it is stored in SYSPROCS

nolinemarks - true or false

recompile - true means just compile, false means write then compile (AFAIK)

ifdeflist - @fm delim'd list of defines (e.g. REVENG)

Cameron Purdy

Revelation Software

You could also just change and call a subroutine that in OI passes control to UTILITY and in AREV have it execute or something. Different programs, obviously, not the same or it will have the same problems as this.

apk@sprezzatura.com

Sprezzatura, Inc.

The DEFINE was implemented in the cross-compiler( RTP5.OE ) and was indeed part of the build system. Essentially, it called rev_compiler with REVENG or AREV defined as needed based on program and source output listings.

Actually, a better question would be if rev_compile is in RESPOS..COMPILE and if so, are there extra params and/or can it be shelled. Now I'll have to look for my repos header docs….

Hold on….

repository( 'COMPILE', EntID, ConditionalComp, IFDefList, StripMarks)

So, perhaps one could shell the right repos (REPOS.STPROC..COMPILE) to force in a REVENG compile.

Of course, if we ask really, really politely, we could ask Cameron to include this into 3.6.

apk@sprezzatura.com

Sprezzatura, Inc.

apk,

If it were being changed for 3.6 … perhaps to handle "expendable" for example … then I'd think about it.

Cameron Purdy

Revelation Software

Well, if you're waiting to be asked….

Cam, what is the possiblity of adding the expendable keyword back into subroutines?

apk@sprezzatura.com

Sprezzatura, Inc.

View this thread on the forum...