Mercurial > mxe-octave
view src/gd-test.c @ 6396:d5e6775fb3bc release
Add uninstall options to remove local packages and settings (Bug #62352)
* src/default-octave.mk, src/release-octave.mk, src/stable-octave.mk: save api version to file
* tools/makeinst-script.sh.in: add uninstall options, and on set, remove specified files from appdata/octave
(grafted from 8fe292548edfeb8a82e64f0e2b5da1a65e35d835)
author | John Donoghue <john.donoghue@ieee.org> |
---|---|
date | Wed, 31 Aug 2022 08:09:19 -0400 |
parents | 99516e73b368 |
children |
line wrap: on
line source
/* * This file is part of MXE. * See index.html for further information. * * This is a slightly modified version of: * examples/arc.c */ #include "gd.h" #include <stdio.h> #include <stdlib.h> int main(int argc, char *argv[]) { gdImagePtr im; FILE *fp; int cor_rad; (void)argc; (void)argv; cor_rad = 400; im = gdImageCreateTrueColor(400, 400); gdImageFilledRectangle(im, 0, 0, 399, 399, 0x00FFFFFF); gdImageFilledArc(im, cor_rad, 399 - cor_rad, cor_rad * 2, cor_rad * 2, 90, 180, 0x0, gdPie); fp = fopen("test-gd.png", "wb"); if (!fp) { fprintf(stderr, "Can't save png image.\n"); gdImageDestroy(im); return 1; } gdImagePng(im, fp); fclose(fp); fprintf(stdout, "test-gd.png created\n"); gdImageDestroy(im); return 0; }