Bitmap/Read a PPM file: Difference between revisions
Content deleted Content added
| Line 257: | Line 257: | ||
=={{header|Common Lisp}}== |
=={{header|Common Lisp}}== |
||
The function read-ppm-image reads either a P6 or P3 file depending on the file contents. The package description assumes that you have the [[Basic bitmap storage]]. |
The function read-ppm-image reads either a P6 or P3 file depending on the file contents. The package description assumes that you have the [[Basic bitmap storage]] package. |
||
<lang lisp> |
<lang lisp> |
||
| Line 330: | Line 330: | ||
(t 'unsupported)) |
(t 'unsupported)) |
||
image)))) |
image)))) |
||
(export 'read-ppm-image) |
|||
</lang> |
</lang> |
||