- fixed pengine2d_DelEmitter(removing last emitter)

git-svn-id: http://zengl.googlecode.com/svn/branches/0.3.x@1986 6573c10b-8653-0410-9706-d32479e959fb

headers/zglHeader.h

@@ -3,7 +3,7 @@
 /*--------------------------------*/
 /*                                */
 /* version:  0.3.9                */
-/* date:     2013.03.05           */
+/* date:     2013.03.06           */
 /* license:  zlib                 */
 /* homepage: http://zengl.org     */
 /*                                */

headers/zglHeader.pas

@@ -3,7 +3,7 @@
 {--------------------------------}
 {                                }
 { version:  0.3.9                }
-{ date:     2013.03.05           }
+{ date:     2013.03.06           }
 { license:  zlib                 }
 { homepage: http://zengl.org     }
 {                                }

src/zgl_main.pas

@@ -49,7 +49,7 @@ uses
 
 const
   cs_ZenGL    = 'ZenGL 0.3.9';
-  cs_Date     = '2013.03.05';
+  cs_Date     = '2013.03.06';
   cv_major    = 0;
   cv_minor    = 3;
   cv_revision = 9;

src/zgl_particles_2d.pas

@@ -542,7 +542,8 @@ begin
     pengine2d.ListU[ ID ]^ := nil;
   emitter2d_Free( pengine2d.List[ ID ] );
   pengine2d.List[ ID ]    := pengine2d.List[ pengine2d.Count.Emitters - 1 ];
-  pengine2d.List[ ID ].ID := ID;
+  if pengine2d.List[ ID ] <> nil Then
+    pengine2d.List[ ID ].ID := ID;
   pengine2d.ListU[ ID ]   := pengine2d.ListU[ pengine2d.Count.Emitters - 1 ];
   DEC( pengine2d.Count.Emitters );
 end;