blob: 9d938ef55186d89e51ae49872da0c5c47071fedf (
plain) (
blame)
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
29
30
31
32
33
34
35
36
37
38
39
40
41
|
definition module ABC.Machine.BStack
from StdOverloaded import class ==, class toString
from ABC.Machine.Def import ::NrArgs
:: Basic = Int Int
| Bool Bool
instance == Basic
instance toString Basic
:: BSrc :== Int
:: BDst :== Int
:: BStack (:== [Basic])
instance toString BStack
bs_copy :: BSrc BStack -> BStack
bs_get :: BSrc BStack -> Basic
bs_getB :: BSrc BStack -> Bool
bs_getI :: BSrc BStack -> Int
bs_init :: BStack
bs_popn :: NrArgs BStack -> BStack
bs_push :: Basic BStack -> BStack
bs_pushB :: Bool BStack -> BStack
bs_pushI :: Int BStack -> BStack
bs_update :: BDst Basic BStack -> BStack
bs_addI :: BStack -> BStack
bs_decI :: BStack -> BStack
bs_divI :: BStack -> BStack
bs_incI :: BStack -> BStack
bs_eqB :: BStack -> BStack
bs_eqI :: BStack -> BStack
bs_eqBi :: Bool BSrc BStack -> BStack
bs_eqIi :: Int BSrc BStack -> BStack
bs_gtI :: BStack -> BStack
bs_ltI :: BStack -> BStack
bs_mulI :: BStack -> BStack
bs_negI :: BStack -> BStack
bs_remI :: BStack -> BStack
bs_subI :: BStack -> BStack
|