diff options
author | Nikita Orlov <nikitf-97@mail.ru> | 2021-04-05 12:10:01 +0300 |
---|---|---|
committer | Nikita Orlov <nikitf-97@mail.ru> | 2021-04-05 12:10:01 +0300 |
commit | 383a79618a622c33d07c6fd16ba0880288609ae9 (patch) | |
tree | eb3124faec8f67def8ee7a7e25243baae3d0f7f5 /src/Utils.hs | |
parent | df61507c50cf8b816bd08b5a2b1a5290a6db8dd3 (diff) | |
download | suem-383a79618a622c33d07c6fd16ba0880288609ae9.tar suem-383a79618a622c33d07c6fd16ba0880288609ae9.tar.xz suem-383a79618a622c33d07c6fd16ba0880288609ae9.zip |
SUB, SUBA, CMP, CMPA added
Diffstat (limited to 'src/Utils.hs')
-rw-r--r-- | src/Utils.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Utils.hs b/src/Utils.hs index cd2f1e3..a5b0757 100644 --- a/src/Utils.hs +++ b/src/Utils.hs @@ -46,6 +46,10 @@ getSize 0 = 1 getSize 1 = 2 getSize 2 = 4 +getShortSize :: Int -> Int +getShortSize 0 = 2 +getShortSize 1 = 4 + getMoveSize :: Int -> Int getMoveSize 1 = 1 getMoveSize 3 = 2 |