[m-dev.] Opium-M [1/5]

[Fergus Henderson]

On 26-Oct-1999, Erwan Jahier <Erwan.Jahier at irisa.fr> wrote:
> +++ INSTALL-OPIUM-M	Tue Oct 26 23:26:06 1999
> @@ -0,0 +1,88 @@
> +#!/bin/sh
> +# Copyright (C) 1999 IRISA/INRIA.

It would be nice to include a pointer to where the license
conditions are stated after each copyright message.

...
> +MERCURY_OPIUM_DIR=`pwd`
> +export MERCURY_OPIUM_DIR 
> +cd scripts
> +rm -f Opium-M
> +touch Opium-M

What is the purpose of the `touch' command here?

> +# Get the Mercury library path (needed in source-M scenario)
> +MmcDefault=/soft/mercury/library
> +
> +echo "What is the complete path of the Mercury library files? [default=$MmcDefault]"

The term "library files" is ambiguous; I suggest you do

	s/library files/library source files/

> +++ fixmanual	Tue Oct 26 23:26:25 1999
> @@ -0,0 +1,48 @@
> +#!/bin/sh -
> +
> +# /*	
> +#  *	$Header: fixmanual,v 1.5 90/12/20 18:43:41 anna Exp $
> +#  *	1990 Copyright ECRC GmbH
> +#  */
> +
> +# Fix the manual file
> +
> +ex $1 <<\EOF
> +%s/_/\\_/g
> +w
> +q
> +EOF
> +ex $1 <<\EOF
> +%s/</$<$/g
> +w
> +q
> +EOF
> +ex $1 <<\EOF
> +%s/>/$>$/g
> +w
> +q
> +EOF
> +ex $1 <<\EOF
> +%s/\\==/$\\backslash$==/g
> +w
> +q
> +EOF
> +ex $1 <<\EOF
> +%s/\\=/$\\backslash$=/g
> +w
> +q
> +EOF
> +ex $1 <<\EOF
> +%s/=/$=$/g
> +w
> +q
> +EOF
> +ex $1 <<\EOF
> +%s/\~/\\verb+\~+/g
> +w
> +q
> +EOF

You could make that simpler and more efficient
by deleting every occurrence of the four lines

	w
	q
	EOF
	ex $1 <<\EOF

which would leave

	ex $1 <<\EOF
	%s/_/\\_/g
	%s/</$<$/g
	%s/>/$>$/g
	%s/\\==/$\\backslash$==/g
	%s/\\=/$\\backslash$=/g
	%s/=/$=$/g
	%s/\~/\\verb+\~+/g
	w
	q
	EOF

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
WWW: <http://www.cs.mu.oz.au/~fjh>  |  of excellence is a lethal habit"
PGP: finger fjh at 128.250.37.3        |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
mercury-developers mailing list
Post messages to:       mercury-developers at cs.mu.oz.au
Administrative Queries: owner-mercury-developers at cs.mu.oz.au
Subscriptions:          mercury-developers-request at cs.mu.oz.au
--------------------------------------------------------------------------