Check-in [e8b70552ee]

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Created a tool to create a static page from a rivet page
Timelines: family | ancestors | trunk
Files: files | file ages | folders
SHA1:e8b70552eefff4337a3284595b016ac89bd6bde9
User & Date: rkeene 2019-02-20 15:33:46
Context
2019-02-20
15:33
Created a tool to create a static page from a rivet page Leaf check-in: e8b70552ee user: rkeene tags: trunk
2018-04-28
04:04
Need to also set baseEnvironment for threads check-in: 2a85db2588 user: rkeene tags: trunk
Changes

Changes to bin/Makefile.

4
5
6
7
8
9
10












11
12
13
14
15
16
17



all: $(BINS)

rivet.cgi: rivet
	rm -f rivet.cgi
	ln rivet rivet.cgi













rivet: rivet.o
rivet.o: rivet.c

.PHONY: clean

clean:
	rm -f $(BINS) rivet *.o









>
>
>
>
>
>
>
>
>
>
>
>







>
>
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31

all: $(BINS)

rivet.cgi: rivet
	rm -f rivet.cgi
	ln rivet rivet.cgi

rivet-render-static: Makefile rivet-render-static.in $(shell find ../packages/tclrivet -type f -name '*.tcl')
	rm -f rivet-render-static.new rivet-render-static.head rivet-render-static.body
	echo '#! /usr/bin/env tclsh' > rivet-render-static.head
	@set -x; for file in $(shell find ../packages/tclrivet -type f -name '*.tcl' | egrep -v '/(rivet_ncgi|commserver)/' | egrep -v '/(pkgIndex|parse)\.tcl$$') rivet-render-static.in; do \
		grep 'package provide' "$${file}" >> rivet-render-static.head; \
		cat "$${file}" | grep -v '\bsource ' | grep -v ' auto_path ' >> rivet-render-static.body || exit 1; \
	done
	cat rivet-render-static.head rivet-render-static.body > rivet-render-static.new
	rm -f rivet-render-static.head rivet-render-static.body
	chmod +x rivet-render-static.new
	mv rivet-render-static.new rivet-render-static

rivet: rivet.o
rivet.o: rivet.c

.PHONY: clean

clean:
	rm -f $(BINS) rivet *.o
	rm -f rivet-render-static.new rivet-render-static.head rivet-render-static.body
	rm -f rivet-render-static

Added bin/rivet-render-static.in.















































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
#! /usr/bin/env tclsh

if {[catch {
	package require tclrivet
}]} {
	lappend auto_path [file join [file dirname [file normalize [info script]]] .. packages]
	package require tclrivet
}

set ::rivet::header_sent 1

foreach file $argv {
	if {[catch {
		parse $file
	}]} {
		puts stderr "error: Failed to parse \"$file\": $::errorInfo"
		exit 1
	}
}

rivet_flush

exit 0