%%%% Starting test foreign-c-system
Group begin: foreign-c-system
Test begin:
  source-file: "./test-r7rs"
  source-line: 13
  source-form: (test-assert
(= exit-code1
0))
Test end:
  result-kind: pass
  actual-value: #t
Test begin:
  source-file: "./test-r7rs"
  source-line: 23
  source-form: (test-assert
(string=? text
"Hello"))
Test end:
  result-kind: fail
  actual-value: #f
Test begin:
  source-file: "./test-r7rs"
  source-line: 27
  source-form: (test-assert
(> exit-code2
0))
Test end:
  result-kind: pass
  actual-value: #t
Group end: foreign-c-system
# of expected passes      2
# of unexpected failures  1