- find-file-fmtprocedure
- in - FILENAME: string
- out - PFMT: ptr to int
- returns: 0 on success, 1 if error/unrecognized format.
(define-external fmt int) (define r (find-file-fmt "file0.png" (location fmt))) ;; r -> 0 (no error), fmt -> 3
(define-external fmt int) (define r (find-file-fmt "file0.png" (location fmt))) ;; r -> 0 (no error), fmt -> 3