Overview
Comment: | Fixed an unbound variable and made it handle 1.81. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | v1.81-fix-api-changed |
Files: | files | file ages | folders |
SHA1: |
dc561cf3576b83c3a2c2c3ff38fd9307 |
User & Date: | mmgraham on 2024-07-03 12:50:53 |
Original Comment: | Fixed an unbound variable and made it handle 1.81. Enter a commit message for this check-in. Lines beginning with # are ignored. |
Other Links: | branch diff | manifest | tags |
Context
2024-07-08
| ||
12:55 | CI/CD: Automated commit after successful test, build, and deploy for v1.81-fix-api-changed check-in: 0249193b68 user: ramartin tags: v1.81 | |
2024-07-03
| ||
12:50 | Fixed an unbound variable and made it handle 1.81. Leaf check-in: dc561cf357 user: mmgraham tags: v1.81-fix-api-changed | |
2024-07-01
| ||
17:27 | Changed version to v1.8101 check-in: 6b8bacba76 user: mmgraham tags: v1.81, v1.8101 | |
Changes
Modified common.scm from [1039cd02f7] to [436f5e3d6d].
︙ | ︙ | |||
398 399 400 401 402 403 404 | (- megatest-version (common:get-last-run-version-number))) (define (common:version-changed?) (not (equal? (common:get-last-run-version) (common:version-signature)))) | | | | | 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 | (- megatest-version (common:get-last-run-version-number))) (define (common:version-changed?) (not (equal? (common:get-last-run-version) (common:version-signature)))) ;; From 1.70 to 1.81, db's are compatible. (define (common:api-changed?) (let* ( (megatest-major-version (substring (->string megatest-version) 0 4)) (run-major-version (substring (conc (common:get-last-run-version)) 0 4)) ) (and (not (or (equal? megatest-major-version "1.80") (equal? megatest-major-version "1.81"))) (not (equal? megatest-major-version run-major-version))) ) ) ;;====================================================================== ;; Move me elsewhere ... ;; RADT => Why do we meed the version check here, this is called only if version misma ;; |
︙ | ︙ |