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;
}