Mercurial > vim
view src/xpm_w32.c @ 10958:e5896de85dcf v8.0.0368
patch 8.0.0368: not all options are tested with a range of values
commit https://github.com/vim/vim/commit/2f5463df014a406a2b780068e341ef30a99c9b98
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Feb 25 20:40:46 2017 +0100
patch 8.0.0368: not all options are tested with a range of values
Problem: Not all options are tested with a range of values.
Solution: Generate a test script from the source code.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sat, 25 Feb 2017 20:45:04 +0100 |
parents | 4aead6a9b7a9 |
children | 15539899a112 |
line wrap: on
line source
/* vi:set ts=8 sts=4 sw=4 noet: * * Load XPM image. * * This function is placed in separate file because Xpm headers conflict with * Vim ones :( * * Written by Sergey Khorev. * http://iamphet.nm.ru/vim/index.html */ #ifndef WIN32_LEAN_AND_MEAN # define WIN32_LEAN_AND_MEAN #endif #include <windows.h> #include "xpm_w32.h" /* Engage Windows support in libXpm */ #define FOR_MSW #include "xpm.h" /* * Tries to load an Xpm image from the file "filename". * Returns -1 on failure. * Returns 0 on success and stores image and mask BITMAPS in "hImage" and * "hShape". */ int LoadXpmImage( char *filename, HBITMAP *hImage, HBITMAP *hShape) { XImage *img; /* loaded image */ XImage *shp; /* shapeimage */ XpmAttributes attr; int res; HDC hdc = CreateCompatibleDC(NULL); attr.valuemask = 0; res = XpmReadFileToImage(&hdc, filename, &img, &shp, &attr); DeleteDC(hdc); if (res < 0) return -1; if (shp == NULL) { if (img) XDestroyImage(img); return -1; } *hImage = img->bitmap; *hShape = shp->bitmap; return 0; }