Megatest

Check-in [6df0c4fb3a]
Login
Overview
Comment:Added missing import of mtargs. Fixed typo
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.70-refactor01 | v1.70-defunct-try
Files: files | file ages | folders
SHA1: 6df0c4fb3a9b627cafaa5eb6da55b8a2b0fbd058
User & Date: matt on 2019-12-17 20:25:24
Other Links: branch diff | manifest | tags
Context
2019-12-28
06:25
Re-ordered some imports and added deps Leaf check-in: b6aa34569a user: matt tags: v1.70-refactor01, v1.70-defunct-try
2019-12-17
20:25
Added missing import of mtargs. Fixed typo check-in: 6df0c4fb3a user: matt tags: v1.70-refactor01, v1.70-defunct-try
2019-12-16
22:57
Added stml2 as compilation unit/module check-in: 78408a15fb user: matt tags: v1.70-refactor01, v1.70-defunct-try
Changes

Modified commonmod.scm from [7d9c429e88] to [ae47c70f8b].

16
17
18
19
20
21
22
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
16
17
18
19
20
21
22

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







-
+

















-
+
-
-
+







;;     You should have received a copy of the GNU General Public License
;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.

;;======================================================================

(declare (unit commonmod))
(declare (uses mtargs))
(declare (uses stml2))m
(declare (uses stml2))
	 
(module commonmod
	*
	
(import scheme chicken data-structures extras)
	
(import (prefix sqlite3 sqlite3:) posix typed-records srfi-18
	srfi-1 files format srfi-13 matchable 
	srfi-69 ports
	regex-case regex hostinfo srfi-4
	pkts (prefix dbi dbi:)
	stack
	md5
	message-digest
	(prefix mtconfigf configf:)
	stml2
	;; (prefix margs args:)
	z3 (prefix base64 base64:))
	z3 (prefix base64 base64:)

(import (prefix mtargs args:))
	(prefix mtargs args:))

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

 ;; no need to export this
(define *verbosity-cache* (make-hash-table))

Modified dashboard.scm from [53e0f92bae] to [dfcdf77012].

75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
75
76
77
78
79
80
81

82
83
84
85
86
87
88







-







(import (prefix mtconfigf configf:))


(include "common_records.scm")
(include "db_records.scm")
(include "run_records.scm")
(include "task_records.scm")
;; (include "megatest-fossil-hash.scm") ;; comes from megamod
(include "vg_records.scm")

;; invoke the imports
(declare (uses commonmod.import))
(declare (uses testsmod.import))
(declare (uses rmtmod.import))
(declare (uses runsmod.import))

Modified megatest.scm from [5fdbb6ccd1] to [658062bedf].

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
55
56
28
29
30
31
32
33
34















35
36
37
38
39
40
41







-
-
-
-
-
-
-
-
-
-
-
-
-
-
-








;; Added for csv stuff - will be removed
;;
(use sparse-vectors)

(require-library mutils)

;; (use zmq)

;; (declare (uses common))
;; (declare (uses megatest-version))
;; (declare (uses margs))
;; (declare (uses runs))
;; (declare (uses launch))
;; (declare (uses server))
;; (declare (uses client))
;; (declare (uses tests))
;; (declare (uses genexample))
;; ;; (declare (uses daemon))
;; (declare (uses db))
;; ;; (declare (uses dcommon))

(declare (uses commonmod))
(import commonmod)
(declare (uses rmtmod))
(import rmtmod)
(declare (uses dbmod))
(import dbmod)
(declare (uses runsmod))

Modified testsmod.scm from [12c4abfdd3] to [5ab2ff9bf1].

16
17
18
19
20
21
22

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


35
36
37
38
39
40
41
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32



33
34
35
36
37
38
39
40
41







+









-
-
-
+
+







;;     You should have received a copy of the GNU General Public License
;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.

;;======================================================================

(declare (unit testsmod))
(declare (uses commonmod))
(declare (uses mtargs))

(module testsmod
	*
	
(import scheme chicken data-structures extras)

(import (prefix sqlite3 sqlite3:) posix typed-records srfi-18 srfi-69 format ports srfi-1 matchable
	(prefix mtconfigf configf:)
	regex srfi-13
	)
(import commonmod)
;; (use (prefix ulex ulex:))
	commonmod
	(prefix mtargs args:))

(define *java-script-lib* #f)

(define (init-java-script-lib)
  (set! *java-script-lib* (conc  (common:get-install-area) "/share/js/jquery-3.1.0.slim.min.js"))
  )