|
|
@ -902,6 +902,7 @@ |
|
|
|
(var in-file (* FILE) (fopen "Errors.cakedata" "r")) |
|
|
|
(unless in-file (return 1)) |
|
|
|
(var file-contents (* (const char)) (read-file-into-memory in-file)) |
|
|
|
(fprintf stderr "note: I expect to fail to read struct from Errors.cakedata\n") |
|
|
|
(when (read-introspect-struct-s-exp (addr my-struct--metadata) (addr read-struct) |
|
|
|
file-contents malloc) |
|
|
|
(fprintf stderr "error: expected to fail to read struct from Errors.cakedata\n") |
|
|
|