Overview
Comment: | Added more flexibiltiy to sense syntax, still super simple but just enough to allow multiple var/vals per line |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | v1.64 | v1.64-defunct |
Files: | files | file ages | folders |
SHA1: |
9fc62f8d178788fc8a2012bec0b233c7 |
User & Date: | matt on 2017-02-21 22:55:42 |
Other Links: | branch diff | manifest | tags |
Context
2017-02-21
| ||
22:55 | Added more flexibiltiy to sense syntax, still super simple but just enough to allow multiple var/vals per line Closed-Leaf check-in: 9fc62f8d17 user: matt tags: v1.64, v1.64-defunct | |
21:31 | Missing param check-in: 11f9127253 user: mrwellan tags: v1.64, v1.64-defunct | |
Changes
Modified common.scm from [0f03b1a388] to [bd82345b7a].
︙ | |||
812 813 814 815 816 817 818 819 820 821 822 823 824 825 | 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 | + + + + + + + + | (file-modification-time fname)))) (if (> curmod last-mod) (list curmod fname) res))) '(0 "n/a") all-files))) ;; use bash to expand a glob. Does NOT handle paths with spaces! ;; (define (common:bash-glob instr) (string-split (with-input-from-pipe (conc "/bin/bash -c \"echo " instr "\"") read-line))) ;;====================================================================== ;; T A R G E T S , S T A T E , S T A T U S , ;; R U N N A M E A N D T E S T P A T T ;;====================================================================== ;; (map print (map car (hash-table->alist (read-config "runconfigs.config" #f #t)))) ;; |
︙ |
Modified mtut.scm from [836619b7ba] to [ea91541450].
︙ | |||
344 345 346 347 348 349 350 | 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 | + - - - + + + + + + + + + + + + + - + - - - - + + + + + - + + - - + + - + | (let* ((keydats (configf:get-section rgconf runkey))) (for-each (lambda (sense) ;; these are the sense rules (let* ((key (car sense)) (val (cadr sense)) (keyparts (string-split key ":")) (contour (car keyparts)) (len-key (length keyparts)) |
︙ |
Modified runconfigs.config from [9aede9683d] to [798bc88af4].
1 2 3 4 | 1 2 3 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 | - - - + + + + + + + + + + + + + - - - + + + | [v1.63/tip/dev] # file: files changes since last run trigger new run # script: script is called with unix seconds as last parameter (other parameters are preserved) # |