summaryrefslogtreecommitdiff
path: root/vaporize/tests/LinkedList.vapor
diff options
context:
space:
mode:
authorbd-912 <bdunahu@colostate.edu>2024-04-26 15:50:38 -0600
committerbd-912 <bdunahu@colostate.edu>2024-04-26 15:50:38 -0600
commit1851f5e76018ec1df3b55dce6cc9a64c9497bf7a (patch)
tree30f629f7b137a494d4202487f4e22df2d9456481 /vaporize/tests/LinkedList.vapor
parent012298517078170762112abe2654dc69b2f146e1 (diff)
Rearrange directory structure
Diffstat (limited to 'vaporize/tests/LinkedList.vapor')
-rw-r--r--vaporize/tests/LinkedList.vapor505
1 files changed, 0 insertions, 505 deletions
diff --git a/vaporize/tests/LinkedList.vapor b/vaporize/tests/LinkedList.vapor
deleted file mode 100644
index bebdf94..0000000
--- a/vaporize/tests/LinkedList.vapor
+++ /dev/null
@@ -1,505 +0,0 @@
-
-const vmt_Element
- :Element.Init
- :Element.GetAge
- :Element.GetSalary
- :Element.GetMarried
- :Element.Equal
- :Element.Compare
-
-const vmt_List
- :List.Init
- :List.InitNew
- :List.Insert
- :List.SetNext
- :List.Delete
- :List.Search
- :List.GetEnd
- :List.GetElem
- :List.GetNext
- :List.Print
-
-const vmt_LL
- :LL.Start
-
-
-func Main()
- t.0 = HeapAllocZ(4)
- [t.0] = :vmt_LL
- if t.0 goto :null1
- Error("null pointer")
- null1:
- t.1 = [t.0]
- t.1 = [t.1+0]
- t.2 = call t.1(t.0)
- PrintIntS(t.2)
- ret
-
-func Element.Init(this v_Age v_Salary v_Married)
- [this+4] = v_Age
- [this+8] = v_Salary
- [this+12] = v_Married
- ret 1
-
-func Element.GetAge(this)
- t.0 = [this+4]
- ret t.0
-
-func Element.GetSalary(this)
- t.0 = [this+8]
- ret t.0
-
-func Element.GetMarried(this)
- t.0 = [this+12]
- ret t.0
-
-func Element.Equal(this other)
- ret_val = 1
- if other goto :null2
- Error("null pointer")
- null2:
- t.0 = [other]
- t.0 = [t.0+4]
- aux01 = call t.0(other)
- t.1 = [this]
- t.1 = [t.1+20]
- t.2 = [this+4]
- t.3 = call t.1(this aux01 t.2)
- t.4 = Sub(1 t.3)
- if0 t.4 goto :if1_else
- ret_val = 0
- goto :if1_end
- if1_else:
- if other goto :null3
- Error("null pointer")
- null3:
- t.5 = [other]
- t.5 = [t.5+8]
- aux02 = call t.5(other)
- t.6 = [this]
- t.6 = [t.6+20]
- t.7 = [this+8]
- t.8 = call t.6(this aux02 t.7)
- t.9 = Sub(1 t.8)
- if0 t.9 goto :if2_else
- ret_val = 0
- goto :if2_end
- if2_else:
- t.10 = [this+12]
- if0 t.10 goto :if3_else
- if other goto :null4
- Error("null pointer")
- null4:
- t.11 = [other]
- t.11 = [t.11+12]
- t.12 = call t.11(other)
- t.13 = Sub(1 t.12)
- if0 t.13 goto :if4_else
- ret_val = 0
- goto :if4_end
- if4_else:
- nt = 0
- if4_end:
- goto :if3_end
- if3_else:
- if other goto :null5
- Error("null pointer")
- null5:
- t.14 = [other]
- t.14 = [t.14+12]
- t.15 = call t.14(other)
- if0 t.15 goto :if5_else
- ret_val = 0
- goto :if5_end
- if5_else:
- nt = 0
- if5_end:
- if3_end:
- if2_end:
- if1_end:
- ret ret_val
-
-func Element.Compare(this num1 num2)
- retval = 0
- aux02 = Add(num2 1)
- t.0 = LtS(num1 num2)
- if0 t.0 goto :if6_else
- retval = 0
- goto :if6_end
- if6_else:
- t.1 = LtS(num1 aux02)
- t.2 = Sub(1 t.1)
- if0 t.2 goto :if7_else
- retval = 0
- goto :if7_end
- if7_else:
- retval = 1
- if7_end:
- if6_end:
- ret retval
-
-func List.Init(this)
- [this+12] = 1
- ret 1
-
-func List.InitNew(this v_elem v_next v_end)
- [this+12] = v_end
- [this+4] = v_elem
- [this+8] = v_next
- ret 1
-
-func List.Insert(this new_elem)
- aux03 = this
- t.0 = HeapAllocZ(16)
- [t.0] = :vmt_List
- aux02 = t.0
- if aux02 goto :null6
- Error("null pointer")
- null6:
- t.1 = [aux02]
- t.1 = [t.1+4]
- ret_val = call t.1(aux02 new_elem aux03 0)
- ret aux02
-
-func List.SetNext(this v_next)
- [this+8] = v_next
- ret 1
-
-func List.Delete(this e)
- my_head = this
- ret_val = 0
- aux04 = Sub(0 1)
- aux01 = this
- prev = this
- var_end = [this+12]
- var_elem = [this+4]
- while1_top:
- t.1 = Sub(1 var_end)
- if0 t.1 goto :ss1_else
- t.0 = Sub(1 ret_val)
- goto :ss1_end
- ss1_else:
- t.0 = 0
- ss1_end:
- if0 t.0 goto :while1_end
- if e goto :null7
- Error("null pointer")
- null7:
- t.2 = [e]
- t.2 = [t.2+16]
- t.3 = call t.2(e var_elem)
- if0 t.3 goto :if8_else
- ret_val = 1
- t.4 = LtS(aux04 0)
- if0 t.4 goto :if9_else
- if aux01 goto :null8
- Error("null pointer")
- null8:
- t.5 = [aux01]
- t.5 = [t.5+32]
- my_head = call t.5(aux01)
- goto :if9_end
- if9_else:
- t.6 = Sub(0 555)
- PrintIntS(t.6)
- if prev goto :null9
- Error("null pointer")
- null9:
- t.7 = [prev]
- t.7 = [t.7+12]
- if aux01 goto :null10
- Error("null pointer")
- null10:
- t.8 = [aux01]
- t.8 = [t.8+32]
- t.9 = call t.8(aux01)
- aux05 = call t.7(prev t.9)
- t.10 = Sub(0 555)
- PrintIntS(t.10)
- if9_end:
- goto :if8_end
- if8_else:
- nt = 0
- if8_end:
- t.11 = Sub(1 ret_val)
- if0 t.11 goto :if10_else
- prev = aux01
- if aux01 goto :null11
- Error("null pointer")
- null11:
- t.12 = [aux01]
- t.12 = [t.12+32]
- aux01 = call t.12(aux01)
- if aux01 goto :null12
- Error("null pointer")
- null12:
- t.13 = [aux01]
- t.13 = [t.13+24]
- var_end = call t.13(aux01)
- if aux01 goto :null13
- Error("null pointer")
- null13:
- t.14 = [aux01]
- t.14 = [t.14+28]
- var_elem = call t.14(aux01)
- aux04 = 1
- goto :if10_end
- if10_else:
- nt = 0
- if10_end:
- goto :while1_top
- while1_end:
- ret my_head
-
-func List.Search(this e)
- int_ret_val = 0
- aux01 = this
- var_end = [this+12]
- var_elem = [this+4]
- while2_top:
- t.0 = Sub(1 var_end)
- if0 t.0 goto :while2_end
- if e goto :null14
- Error("null pointer")
- null14:
- t.1 = [e]
- t.1 = [t.1+16]
- t.2 = call t.1(e var_elem)
- if0 t.2 goto :if11_else
- int_ret_val = 1
- goto :if11_end
- if11_else:
- nt = 0
- if11_end:
- if aux01 goto :null15
- Error("null pointer")
- null15:
- t.3 = [aux01]
- t.3 = [t.3+32]
- aux01 = call t.3(aux01)
- if aux01 goto :null16
- Error("null pointer")
- null16:
- t.4 = [aux01]
- t.4 = [t.4+24]
- var_end = call t.4(aux01)
- if aux01 goto :null17
- Error("null pointer")
- null17:
- t.5 = [aux01]
- t.5 = [t.5+28]
- var_elem = call t.5(aux01)
- goto :while2_top
- while2_end:
- ret int_ret_val
-
-func List.GetEnd(this)
- t.0 = [this+12]
- ret t.0
-
-func List.GetElem(this)
- t.0 = [this+4]
- ret t.0
-
-func List.GetNext(this)
- t.0 = [this+8]
- ret t.0
-
-func List.Print(this)
- aux01 = this
- var_end = [this+12]
- var_elem = [this+4]
- while3_top:
- t.0 = Sub(1 var_end)
- if0 t.0 goto :while3_end
- if var_elem goto :null18
- Error("null pointer")
- null18:
- t.1 = [var_elem]
- t.1 = [t.1+4]
- t.2 = call t.1(var_elem)
- PrintIntS(t.2)
- if aux01 goto :null19
- Error("null pointer")
- null19:
- t.3 = [aux01]
- t.3 = [t.3+32]
- aux01 = call t.3(aux01)
- if aux01 goto :null20
- Error("null pointer")
- null20:
- t.4 = [aux01]
- t.4 = [t.4+24]
- var_end = call t.4(aux01)
- if aux01 goto :null21
- Error("null pointer")
- null21:
- t.5 = [aux01]
- t.5 = [t.5+28]
- var_elem = call t.5(aux01)
- goto :while3_top
- while3_end:
- ret 1
-
-func LL.Start(this)
- t.0 = HeapAllocZ(16)
- [t.0] = :vmt_List
- last_elem = t.0
- if last_elem goto :null22
- Error("null pointer")
- null22:
- t.1 = [last_elem]
- t.1 = [t.1+0]
- aux01 = call t.1(last_elem)
- head = last_elem
- if head goto :null23
- Error("null pointer")
- null23:
- t.2 = [head]
- t.2 = [t.2+0]
- aux01 = call t.2(head)
- if head goto :null24
- Error("null pointer")
- null24:
- t.3 = [head]
- t.3 = [t.3+36]
- aux01 = call t.3(head)
- t.4 = HeapAllocZ(16)
- [t.4] = :vmt_Element
- el01 = t.4
- if el01 goto :null25
- Error("null pointer")
- null25:
- t.5 = [el01]
- t.5 = [t.5+0]
- aux01 = call t.5(el01 25 37000 0)
- if head goto :null26
- Error("null pointer")
- null26:
- t.6 = [head]
- t.6 = [t.6+8]
- head = call t.6(head el01)
- if head goto :null27
- Error("null pointer")
- null27:
- t.7 = [head]
- t.7 = [t.7+36]
- aux01 = call t.7(head)
- PrintIntS(10000000)
- t.8 = HeapAllocZ(16)
- [t.8] = :vmt_Element
- el01 = t.8
- if el01 goto :null28
- Error("null pointer")
- null28:
- t.9 = [el01]
- t.9 = [t.9+0]
- aux01 = call t.9(el01 39 42000 1)
- el02 = el01
- if head goto :null29
- Error("null pointer")
- null29:
- t.10 = [head]
- t.10 = [t.10+8]
- head = call t.10(head el01)
- if head goto :null30
- Error("null pointer")
- null30:
- t.11 = [head]
- t.11 = [t.11+36]
- aux01 = call t.11(head)
- PrintIntS(10000000)
- t.12 = HeapAllocZ(16)
- [t.12] = :vmt_Element
- el01 = t.12
- if el01 goto :null31
- Error("null pointer")
- null31:
- t.13 = [el01]
- t.13 = [t.13+0]
- aux01 = call t.13(el01 22 34000 0)
- if head goto :null32
- Error("null pointer")
- null32:
- t.14 = [head]
- t.14 = [t.14+8]
- head = call t.14(head el01)
- if head goto :null33
- Error("null pointer")
- null33:
- t.15 = [head]
- t.15 = [t.15+36]
- aux01 = call t.15(head)
- t.16 = HeapAllocZ(16)
- [t.16] = :vmt_Element
- el03 = t.16
- if el03 goto :null34
- Error("null pointer")
- null34:
- t.17 = [el03]
- t.17 = [t.17+0]
- aux01 = call t.17(el03 27 34000 0)
- if head goto :null35
- Error("null pointer")
- null35:
- t.18 = [head]
- t.18 = [t.18+20]
- t.19 = call t.18(head el02)
- PrintIntS(t.19)
- if head goto :null36
- Error("null pointer")
- null36:
- t.20 = [head]
- t.20 = [t.20+20]
- t.21 = call t.20(head el03)
- PrintIntS(t.21)
- PrintIntS(10000000)
- t.22 = HeapAllocZ(16)
- [t.22] = :vmt_Element
- el01 = t.22
- if el01 goto :null37
- Error("null pointer")
- null37:
- t.23 = [el01]
- t.23 = [t.23+0]
- aux01 = call t.23(el01 28 35000 0)
- if head goto :null38
- Error("null pointer")
- null38:
- t.24 = [head]
- t.24 = [t.24+8]
- head = call t.24(head el01)
- if head goto :null39
- Error("null pointer")
- null39:
- t.25 = [head]
- t.25 = [t.25+36]
- aux01 = call t.25(head)
- PrintIntS(2220000)
- if head goto :null40
- Error("null pointer")
- null40:
- t.26 = [head]
- t.26 = [t.26+16]
- head = call t.26(head el02)
- if head goto :null41
- Error("null pointer")
- null41:
- t.27 = [head]
- t.27 = [t.27+36]
- aux01 = call t.27(head)
- PrintIntS(33300000)
- if head goto :null42
- Error("null pointer")
- null42:
- t.28 = [head]
- t.28 = [t.28+16]
- head = call t.28(head el01)
- if head goto :null43
- Error("null pointer")
- null43:
- t.29 = [head]
- t.29 = [t.29+36]
- aux01 = call t.29(head)
- PrintIntS(44440000)
- ret 0