Mercurial > mxe-octave
view src/gd-test.c @ 3421:7e0b4087cd58
Add octave forge tsa package
* Makefile.in: Add of-tsa.
* build_packages.m: Add install of tsa-4.2.7.tar.gz
* dist-files: Add of-tsa.mk.
* index.html: Added of-tsa-package.
* src/of-tsa.mk: New file.
* src/libgomp.mk: Install to HOST_PREFIX
author | John Donoghue <john.donoghue@ieee.org> |
---|---|
date | Mon, 13 Jan 2014 21:28:53 -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; }