From dabe98aeac0156155c0c950187b39a037ec0116b Mon Sep 17 00:00:00 2001
From: Pavel <68122101+red-prig@users.noreply.github.com>
Date: Wed, 29 Jun 2022 11:57:53 +0300
Subject: [PATCH] +

---
 spirv/emit_exp.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/spirv/emit_exp.pas b/spirv/emit_exp.pas
index ff1e96ba..34fef3cd 100644
--- a/spirv/emit_exp.pas
+++ b/spirv/emit_exp.pas
@@ -99,10 +99,11 @@ begin
   begin
 
    Case p of
-    0:Assert(false);
     2:rtype:=dtVec2f;
     3:rtype:=dtVec3f;
     4:rtype:=dtVec4f;
+    else
+      Assert(false,IntToStr(p));
    end;
 
    i:=0;