srv/format-def

#!/bin/sh
usage()
{
  printf 'usage: %s [file.lisp]\n' $0
  exit 1
}

sed -E '/^\(defun |\(defmacro /{
 i\

}' "$@" | \
sed '/^[ \t]*$/{
   N
   /^[ \t]*\n$/D
}'
Identifies each binary with a version tag. It also includes scripts for formating Lisp code for people who will read Lisp code directly. It doesn't cost us much to organize the Lisp output a bit. In a similar spirit, I'm not including NOWEB as part of the build process. (Most users will not have NOWEB around to use it.) So while the Makefile is pretty short because there's little to do, Anyfile is the ANYWEB makefile. ANYWEB is my modified, personal version of NOWEB for Windows. (The way I use this second makefile is to make a shell alias called /amake/ that automatically invokes ``make -f Anyfile'' for me.) 2024-12-17 15:21:47 -03:00			`#!/bin/sh`
			`usage()`
			`{`
			`printf 'usage: %s [file.lisp]\n' $0`
			`exit 1`
			`}`
Incorporates format-def, make-release into loop.nw. 2024-12-21 16:35:49 -03:00
Identifies each binary with a version tag. It also includes scripts for formating Lisp code for people who will read Lisp code directly. It doesn't cost us much to organize the Lisp output a bit. In a similar spirit, I'm not including NOWEB as part of the build process. (Most users will not have NOWEB around to use it.) So while the Makefile is pretty short because there's little to do, Anyfile is the ANYWEB makefile. ANYWEB is my modified, personal version of NOWEB for Windows. (The way I use this second makefile is to make a shell alias called /amake/ that automatically invokes ``make -f Anyfile'' for me.) 2024-12-17 15:21:47 -03:00			`sed -E '/^\(defun \|\(defmacro /{`
			`i\`

Incorporates format-def, make-release into loop.nw. 2024-12-21 16:35:49 -03:00			`}' "$@" \| \`
			`sed '/^[ \t]*$/{`
Identifies each binary with a version tag. It also includes scripts for formating Lisp code for people who will read Lisp code directly. It doesn't cost us much to organize the Lisp output a bit. In a similar spirit, I'm not including NOWEB as part of the build process. (Most users will not have NOWEB around to use it.) So while the Makefile is pretty short because there's little to do, Anyfile is the ANYWEB makefile. ANYWEB is my modified, personal version of NOWEB for Windows. (The way I use this second makefile is to make a shell alias called /amake/ that automatically invokes ``make -f Anyfile'' for me.) 2024-12-17 15:21:47 -03:00			`N`
			`/^[ \t]*\n$/D`
			`}'`