;;; ;;; break-gimp.scm - Crash on big palettes for Sven ;;; ;;; ;;; Jeff Trefftzs <trefftzs@xxxxxxxx> ;;; This program is free software; you can redistribute it and/or modify ;;; it under the terms of the GNU General Public License as published by ;;; the Free Software Foundation; either version 2 of the License, or ;;; (at your option) any later version. ;;; ;;; This program is distributed in the hope that it will be useful, ;;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;;; GNU General Public License for more details. ;;; ;;; You should have received a copy of the GNU General Public License ;;; along with this program; if not, write to the Free Software ;;; Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. ;;; Define the function: (define (script-fu-break-gimp inImage inLayer inPalette) (gimp-undo-push-group-start inImage) ;; Real work goes in here (gimp-convert-indexed inImage 0 ; No dithering, since we want pixelized CUSTOM-PALETTE ; create our own palette to start 32 ; using specified no of colors FALSE ; No alpha dither FALSE ; Remove unused colors inPalette) ; Ignored this time (gimp-image-set-active-layer inImage inLayer) (gimp-undo-push-group-end inImage) (gimp-displays-flush) ) (script-fu-register "script-fu-break-gimp" _"<Image>/Script-Fu/TEST/Break Gimp with big palette." "Makes GIMP segfault." "Jeff Trefftzs" "Copyright 2002, Jeff Trefftzs" "February 3, 2002" "RGB*" SF-IMAGE "The Image" 0 SF-DRAWABLE "The Layer" 0 SF-FILENAME "The Palette" "Named_Colors" ) On a pure white image, it just seemed to go into a loop; on an image with a colored gradient it gave multiple segfaults and then crashed. YMMV. -- --Jeff Jeff Trefftzs <trefftzs@xxxxxxxx> http://www.tcsn.net/trefftzs Home Page http://gug.sunsite.dk/gallery.php?artist=68 Gimp Gallery http://trefftzs.topcities.com/home.html Photo galleries
