Mercurial > mxe-octave
view src/gd-test.c @ 4249:a1e2f1eac845
of-gsl: addgsl forge package
* src/of-gsl.mk: new file
* Makefile.in: add gsl to octave forge package list
* dist-files.mk: add of-gsl.mk
* index.html: add of-gsl
* src/gsl.mk: update version, checksum for 2.2.1
author | John D |
---|---|
date | Mon, 21 Nov 2016 15:40:39 -0500 |
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; }