DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download
Index: T r

⟦d65293829⟧ TextFile

    Length: 757 (0x2f5)
    Types: TextFile
    Names: »recomp.com«

Derivation

└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
    └─⟦this⟧ »EUUGD11/gnu-31mar87/emacs/src/recomp.com« 
└─⟦a05ed705a⟧ Bits:30007078 DKUUG GNU 2/12/89
    └─⟦46d41b2d0⟧ »./emacs-18.55.tar.Z« 
        └─⟦fa971747f⟧ 
            └─⟦this⟧ »dist-18.55/src/recomp.com«

TextFile

$ ! VMS command file to recompile a .C file which needs recompilation.
$ ! This is a .C files that has no .OBJ file or that is newer
$ ! than the corresponding .OBJ file.  This file is self contained
$ ! and does not require you to do anything before running it.
$
$    file = f$search(f$parse(p1, ".C"), 1)
$    cmd = p2
$    if cmd .nes. "" then goto havcmd
$    if "''ccom'" .eqs. "" then @precomp
$    cmd = "ccom"
$havcmd:
$    name = f$parse(file,,,"NAME")
$    obj = name + ".OBJ"
$    if f$search(obj) .eqs. "" then goto docmd
$    if f$cvtime(f$file(file, "RDT")) .les. f$cvtime(f$file(obj, "RDT")) then -
	exit
$ docmd:
$    write sys$output "Compiling ''name'..."
$    'cmd' 'file'
$    purge /nolog 'obj'
$    write sys$output "---------------"