Megatest

Check-in [3d4fba2e82]
Login
☰Home Timeline Files Branches Tags Tickets Wiki Login
Overview
Comment:Change few imports
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | v1.65-newview
Files: files | file ages | folders
SHA1: 3d4fba2e820c1e62f2bc2822311388172aeece58
User & Date: matt on 2020-04-06 06:37:29
Other Links: branch diff | manifest | tags
Context
2020-05-26
17:54
Backed out newbuild check-in: 161bd22cfc user: mrwellan tags: v1.65-newview-plus-fixes
2020-04-06
16:20
oops, was working on newview branch. check-in: c9f20f12f3 user: mrwellan tags: v1.65-newview
06:37
Change few imports check-in: 3d4fba2e82 user: matt tags: v1.65-newview
06:24
Changed requires to imports for stml check-in: 681523dd88 user: matt tags: v1.65-newview
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified common.scm from [4d4a2441c8] to [1751eb5552].

︙︙
20
21
22
23
24
25
26
27
28
29
30
31
32

33
34
35
36
37
38
39


(use srfi-1 data-structures posix regex-case (prefix base64 base64:)
     format dot-locking csv-xml z3 udp ;; sql-de-lite
     hostinfo md5 message-digest typed-records directory-utils stack
     matchable regex posix (srfi 18) extras ;; tcp 
     (prefix nanomsg nmsg:)
     (prefix sqlite3 sqlite3:)
     pkts (prefix dbi dbi:)
     )

(declare (unit common))
(declare (uses commonmod))
(import commonmod)


(include "common_records.scm")


;; (require-library margs)
;; (include "margs.scm")









|





>








20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40


(use srfi-1 data-structures posix regex-case (prefix base64 base64:)
     format dot-locking csv-xml z3 udp ;; sql-de-lite
     hostinfo md5 message-digest typed-records directory-utils stack
     matchable regex posix (srfi 18) extras ;; tcp 
     (prefix nanomsg nmsg:)
     (prefix sqlite3 sqlite3:)
     (prefix dbi dbi:)
     )

(declare (unit common))
(declare (uses commonmod))
(import commonmod)
(import pkts)

(include "common_records.scm")


;; (require-library margs)
;; (include "margs.scm")
︙︙

Modified dashboard.scm from [f69a7b566e] to [1c32cae59a].

︙︙
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35

(use format)

(require-library iup)
(import (prefix iup iup:))

(use canvas-draw)
(import canvas-draw-iup)
(use ducttape-lib)
(use sqlite3 srfi-1 posix regex regex-case srfi-69 typed-records sparse-vectors) ;; defstruct
(import (prefix sqlite3 sqlite3:))

(declare (uses common))
(declare (uses margs))
(declare (uses keys))
(declare (uses items))








|








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

(use format)

(require-library iup)
(import (prefix iup iup:))

(use canvas-draw)
(import canvas-draw-iup)
(import ducttape-lib)
(use sqlite3 srfi-1 posix regex regex-case srfi-69 typed-records sparse-vectors) ;; defstruct
(import (prefix sqlite3 sqlite3:))

(declare (uses common))
(declare (uses margs))
(declare (uses keys))
(declare (uses items))
︙︙

Modified diff-report.scm from [722e4fdcd5] to [1eae9c3686].

︙︙
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33

(declare (unit diff-report))
(declare (uses common))
(declare (uses rmt))
         
(include "common_records.scm")
(use matchable)
(use fmt)
(use ducttape-lib)
(define css "")

(define (diff:tests-mindat->hash tests-mindat)
  (let* ((res (make-hash-table)))
    (for-each
     (lambda (item)
       (let* ((test-name+item-path (cons (list-ref item 0) (list-ref item 1)))








|








19
20
21
22
23
24
25
26
27
28
29
30
31
32
33

(declare (unit diff-report))
(declare (uses common))
(declare (uses rmt))
         
(include "common_records.scm")
(use matchable)
(use fmt)
(import ducttape-lib)
(define css "")

(define (diff:tests-mindat->hash tests-mindat)
  (let* ((res (make-hash-table)))
    (for-each
     (lambda (item)
       (let* ((test-name+item-path (cons (list-ref item 0) (list-ref item 1)))
︙︙

Modified megatest.scm from [7e6fcbd15f] to [5076719cbe].

︙︙
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

     readline apropos json http-client directory-utils typed-records
     http-client srfi-18 extras format)

;; 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))








|








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

     readline apropos json http-client directory-utils typed-records
     http-client srfi-18 extras format)

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

(import mutils ducttape-lib)

;; (use zmq)

(declare (uses common))
(declare (uses megatest-version))
(declare (uses margs))
(declare (uses runs))
︙︙

Modified mtut.scm from [24c5bd5940] to [daf0c4d9a4].

︙︙
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

;; (include "common.scm")
;; (include "megatest-version.scm")

;; fake out readline usage of toplevel-command
(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 rmt))

(use ducttape-lib)

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

(import stml2)

;; stuff for the mapper and checker functions
;;








|









|








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

;; (include "common.scm")
;; (include "megatest-version.scm")

;; fake out readline usage of toplevel-command
(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 regex regex-case
     (prefix dbi dbi:)
     nanomsg)

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

(import ducttape-lib pkts)

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

(import stml2)

;; stuff for the mapper and checker functions
;;
︙︙

This page was generated in about 0.124s by Fossil 2.24 [452f8e1ffc] 2024-03-26 15:36:00