wai.h

WASM Interpreter
git clone git://source.orangerot.dev:/wai.h.git
Log | Files | Refs | README | LICENSE

factorial.wat (356B)


      1 ;; SPDX-FileCopyrightText: 2025 orangerot <me@orangerot>
      2 ;;
      3 ;; SPDX-License-Identifier: GPL-3.0
      4 
      5 (module
      6   (func $fac (export "fac") (param f64) (result f64)
      7     local.get 0
      8     f64.const 1
      9     f64.lt
     10     if (result f64)
     11       f64.const 1
     12     else
     13       local.get 0
     14       local.get 0
     15       f64.const 1
     16       f64.sub
     17       call $fac
     18       f64.mul
     19     end))