Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* fix warning

Nikolay Nikolov 1 year ago
parent
03fc5d2323
commit
04a077707c
1 changed files with 2 additions and 0 deletions
Unified View Show Diff Stats
  1. 2 0
      compiler/wasm32/cpubase.pas

+ 2 - 0
compiler/wasm32/cpubase.pas
View File 

@@ -585,6 +585,8 @@ uses
 
     function encode_wasm_basic_type(wbt: TWasmBasicType): Byte;
 
     function encode_wasm_basic_type(wbt: TWasmBasicType): Byte;
 
       begin
 
       begin
 
         case wbt of
 
         case wbt of
 
+          wbt_unknown:
 
+            internalerror(2024011702);
 
           wbt_i32:
 
           wbt_i32:
 
             result:=$7F;
 
             result:=$7F;
 
           wbt_i64:
 
           wbt_i64: