Megatest

Check-in [7a5eb536d0]
Login
Overview
Comment:Got other executables building (not tested at all)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.65-try3
Files: files | file ages | folders
SHA1: 7a5eb536d0e29f04d7927150d3e8bfa43150191f
User & Date: matt on 2019-11-04 05:18:24
Other Links: branch diff | manifest | tags
Context
2019-11-05
04:54
switch to using mtconfigf check-in: b7a9734bdf user: matt tags: v1.65-try3
2019-11-04
05:18
Got other executables building (not tested at all) check-in: 7a5eb536d0 user: matt tags: v1.65-try3
05:09
removed couple more references to OFILES. check-in: 159145e9c3 user: matt tags: v1.65-try3
Changes

Modified Makefile from [c9328338cf] to [2f4f3f2a42].

120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
#	runconfig.o \
#	runs.o \
#	server.o \
#	tasks.o \
#	tdb.o \
#	tests.o \
#	subrun.o \
TCMTOBJS=$(MOFILES)

tcmt : $(TCMTOBJS) tcmt.scm
	csc $(CSCOPTS) $(TCMTOBJS) tcmt.scm -o tcmt

# install documentation to $(PREFIX)/docs
# DOES NOT REBUILD DOCS
#
$(PREFIX)/share/docs/megatest_manual.html : docs/manual/megatest_manual.html
	mkdir -p $(PREFIX)/share/docs
	$(INSTALL) docs/manual/megatest_manual.html $(PREFIX)/share/docs/megatest_manual.html







|

|
|







120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
#	runconfig.o \
#	runs.o \
#	server.o \
#	tasks.o \
#	tdb.o \
#	tests.o \
#	subrun.o \
TCMTOBJS=

tcmt : $(TCMTOBJS) $(MOFILES) tcmt.scm
	csc $(CSCOPTS) $(MOFILES) $(TCMTOBJS) tcmt.scm -o tcmt

# install documentation to $(PREFIX)/docs
# DOES NOT REBUILD DOCS
#
$(PREFIX)/share/docs/megatest_manual.html : docs/manual/megatest_manual.html
	mkdir -p $(PREFIX)/share/docs
	$(INSTALL) docs/manual/megatest_manual.html $(PREFIX)/share/docs/megatest_manual.html

Modified mtexec.scm from [b5282235db] to [ac7a0a03a9].

24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

(use srfi-1 posix srfi-69 readline ;;  regex regex-case srfi-69 apropos json http-client directory-utils rpc typed-records;; (srfi 18) extras)
   srfi-19  srfi-18 extras format pkts regex regex-case
     (prefix dbi dbi:)
     )

;; (declare (uses common))
(declare (uses megatest-version))
(declare (uses margs))
;; (declare (uses configf))

(declare (uses megamod))
(import megamod)

;; (declare (uses rmt))








|
|







24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

(use srfi-1 posix srfi-69 readline ;;  regex regex-case srfi-69 apropos json http-client directory-utils rpc typed-records;; (srfi 18) extras)
   srfi-19  srfi-18 extras format pkts regex regex-case
     (prefix dbi dbi:)
     )

;; (declare (uses common))
;; (declare (uses megatest-version))
;; (declare (uses margs))
;; (declare (uses configf))

(declare (uses megamod))
(import megamod)

;; (declare (uses rmt))

Modified mtut.scm from [c61a56e05f] to [6dd8b4fb0e].

23
24
25
26
27
28
29
30
31
32
33
34

35


36
37
38
39
40
41
42
43

44
45
46
47
48
49
50
(define (toplevel-command . a) #f)

(use srfi-1 posix srfi-69 readline ;;  regex regex-case srfi-69 apropos json http-client directory-utils rpc typed-records;; (srfi 18) extras)
   srfi-19  srfi-18 extras format pkts regex regex-case
     (prefix dbi dbi:)
     nanomsg)

(declare (uses common))
(declare (uses megatest-version))
(declare (uses margs))
(declare (uses configf))
(declare (uses commonmod))

(import commonmod)



;; (declare (uses rmt))

(use ducttape-lib)

(include "megatest-fossil-hash.scm")

(require-library stml)


;; stuff for the mapper and checker functions
;;
(define *target-mappers*  (make-hash-table)) 
(define *runname-mappers* (make-hash-table)) 
(define *area-checkers*   (make-hash-table)) 








|
|
|
|

>

>
>







|
>







23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
(define (toplevel-command . a) #f)

(use srfi-1 posix srfi-69 readline ;;  regex regex-case srfi-69 apropos json http-client directory-utils rpc typed-records;; (srfi 18) extras)
   srfi-19  srfi-18 extras format pkts regex regex-case
     (prefix dbi dbi:)
     nanomsg)

;; (declare (uses common))
;; (declare (uses megatest-version))
;; (declare (uses margs))
(declare (uses configfmod))
(declare (uses commonmod))
(declare (uses megamod))
(import commonmod)
(import configfmod)
(import megamod)

;; (declare (uses rmt))

(use ducttape-lib)

(include "megatest-fossil-hash.scm")

;; (require-library stml)
(use stml2)

;; stuff for the mapper and checker functions
;;
(define *target-mappers*  (make-hash-table)) 
(define *runname-mappers* (make-hash-table)) 
(define *area-checkers*   (make-hash-table)) 

Modified tcmt.scm from [8d018da2d1] to [92574c4144].

24
25
26
27
28
29
30
31
32
33
34
35

36

37
38
39
40
41
42
43
;;

(use srfi-1 posix srfi-69 srfi-18 regex defstruct)

(use trace)
;; (trace-call-sites #t)

(declare (uses margs))
(declare (uses rmt))
(declare (uses common))
(declare (uses megatest-version))


(declare (uses commonmod))

(import commonmod)

(include "megatest-fossil-hash.scm")
(include "db_records.scm")

(define origargs (cdr (argv)))
(define remargs (args:get-args







|
|
|
|

>

>







24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
;;

(use srfi-1 posix srfi-69 srfi-18 regex defstruct)

(use trace)
;; (trace-call-sites #t)

;; (declare (uses margs))
;; (declare (uses rmt))
;; (declare (uses common))
;; (declare (uses megatest-version))

(declare (uses megamod))
(declare (uses commonmod))
(import megamod)
(import commonmod)

(include "megatest-fossil-hash.scm")
(include "db_records.scm")

(define origargs (cdr (argv)))
(define remargs (args:get-args