Megatest

Differences From Artifact [e0a42785e8]:

• File attic/serialize-env.scm — part of check-in [101ee7c52b] at 2021-03-06 04:39:46 on branch v1.65-real-chicken-5 — Try a grounds-up switch to chicken-5 (user: matt, size: 248) [annotate] [blame] [check-ins using]
• File attic_modular/serialize-env.scm — part of check-in [5d8e30ec14] at 2021-03-06 04:45:53 on branch v1.65-real-chicken-5 — wip (user: matt, size: 248) [annotate] [blame] [check-ins using]
• File serialize-env.scm — part of check-in [934132ed7c] at 2018-12-05 13:33:12 on branch v1.65-testpanel-execenv — added serialize-env.scm (user: bjbarcla, size: 248) [annotate] [blame] [check-ins using]

To Artifact [1b1989d604]:

• File serialize-env.scm — part of check-in [04ee759e4a] at 2022-06-28 21:49:09 on branch v1.70-ck5 — bit more done on ck5 (user: matt, size: 254) [annotate] [blame] [check-ins using] [more...]

1
2
3
4
5
6
7
8
9

(use z3)
(use base64)

(let* ((env-str        (with-output-to-string (lambda () (pp (get-environment-variables)))))
       (zipped-env-str (z3:encode-buffer env-str))
       (b64-env-str    (base64-encode zipped-env-str)))
  (print b64-env-str))

|
|

1
2
3
4
5
6
7
8
9

(import z3)
(import base64)

(let* ((env-str        (with-output-to-string (lambda () (pp (get-environment-variables)))))
       (zipped-env-str (z3:encode-buffer env-str))
       (b64-env-str    (base64-encode zipped-env-str)))
  (print b64-env-str))