summaryrefslogtreecommitdiff
path: root/output/ex36.vapor
blob: ef01f499cfe465888eee569fe2a5b769794180bd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
func Main()
  t.4 = HeapAllocZ(4)
  [t.4+0] = :functable_Fac
  t.3 = t.4
  t.3 = t.3
  t.6 = [t.3+0]
  t.7 = [t.6+0]
  t.8 = 10
  t.5 = call t.7(t.3 t.8)
  t.9 = t.5
  PrintIntS(t.9)
  ret

const functable_Fac
   :Fac_ComputeFac

func Fac_ComputeFac(this t.0 )
  t.1 = 4
  t.2 = t.1
  ret t.2

func AllocArray(size)
  bytes = MulS(size 4)
  bytes = Add(bytes 4)
  v = HeapAllocZ(bytes)
  [v] = size
  ret v