Explorar o código

+ override the try finally node for WebAssembly. No functional changes yet.

git-svn-id: branches/wasm@48199 -
nickysn %!s(int64=4) %!d(string=hai) anos
pai
achega
d1c58ccf4b
Modificáronse 1 ficheiros con 6 adicións e 0 borrados
  1. 6 0
      compiler/wasm32/nwasmflw.pas

+ 6 - 0
compiler/wasm32/nwasmflw.pas

@@ -51,6 +51,11 @@ type
      procedure pass_generate_code;override;
    end;
 
+   { twasmtryfinallynode }
+
+   twasmtryfinallynode = class(tcgtryfinallynode)
+   end;
+
 implementation
 
 uses
@@ -190,4 +195,5 @@ end;
 initialization
   cifnode:=twasmifnode;
   cwhilerepeatnode:=twasmwhilerepeatnode;
+  ctryfinallynode:=twasmtryfinallynode;
 end.