projects
/
hs-java.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
d0df50b
)
Cleanup: remove unused imports.
author
Ilya Portnov
<portnov84@rambler.ru>
Mon, 13 Jun 2011 16:10:43 +0000
(22:10 +0600)
committer
Ilya Portnov
<portnov84@rambler.ru>
Mon, 13 Jun 2011 16:10:43 +0000
(22:10 +0600)
Data/BinaryState.hs
patch
|
blob
|
history
JVM/Assembler.hs
patch
|
blob
|
history
JVM/ClassFile.hs
patch
|
blob
|
history
JVM/Converter.hs
patch
|
blob
|
history
disassemble.hs
patch
|
blob
|
history
diff --git
a/Data/BinaryState.hs
b/Data/BinaryState.hs
index 782e0c918f4bc635ed0489c1036cc2e1311fd3b1..fc7fa1d658e8a73f28a6fa5390f0671cb986f6fa 100644
(file)
--- a/
Data/BinaryState.hs
+++ b/
Data/BinaryState.hs
@@
-7,7
+7,6
@@
import qualified Data.Binary as Binary
import qualified Data.Binary.Put as Put
import qualified Data.Binary.Get as Get
import qualified Data.ByteString.Lazy as B
import qualified Data.Binary.Put as Put
import qualified Data.Binary.Get as Get
import qualified Data.ByteString.Lazy as B
-import Foreign.Storable
import Data.Word
import Data.Int
import Data.Word
import Data.Int
diff --git
a/JVM/Assembler.hs
b/JVM/Assembler.hs
index 21ecdd68f3c10931c204b707d04dae048b76f154..d67f31c4fbead315c94de4dcb5d4b8d67ec6c1ae 100644
(file)
--- a/
JVM/Assembler.hs
+++ b/
JVM/Assembler.hs
@@
-14,21
+14,13
@@
module JVM.Assembler
import Control.Monad
import Control.Applicative
import Control.Monad
import Control.Applicative
-import Data.Ix (inRange)
-import Data.List (intercalate)
import Data.Word
import Data.Word
-import Data.Bits
import qualified Data.Binary as Binary
import qualified Data.Binary as Binary
-import qualified Data.Binary.Get as Get
-import Data.Char
import qualified Data.ByteString.Lazy as B
import Data.Array
import qualified Data.ByteString.Lazy as B
import Data.Array
-import qualified Data.Set as S
-import qualified Data.Map as M
import Data.BinaryState
import JVM.ClassFile
import Data.BinaryState
import JVM.ClassFile
-import JVM.Types
-- | Immediate constant. Corresponding value will be added to base opcode.
data IMM =
-- | Immediate constant. Corresponding value will be added to base opcode.
data IMM =
diff --git
a/JVM/ClassFile.hs
b/JVM/ClassFile.hs
index 39df21a9f5beb6e786ec27fddebc68d7f516857e..ef4916cfc4f5f14e12b909bc59eb0d6257a25d54 100644
(file)
--- a/
JVM/ClassFile.hs
+++ b/
JVM/ClassFile.hs
@@
-18,7
+18,6
@@
import Data.Binary
import Data.Binary.IEEE754
import Data.Binary.Get
import Data.Binary.Put
import Data.Binary.IEEE754
import Data.Binary.Get
import Data.Binary.Put
-import Data.Word
import Data.Char
import Data.List
import qualified Data.ByteString.Lazy as B
import Data.Char
import Data.List
import qualified Data.ByteString.Lazy as B
diff --git
a/JVM/Converter.hs
b/JVM/Converter.hs
index 1bc8e8534f64f4cfa6f13817b840671780bda546..2c58cec3e5502db15a05f8b783fc30cc1f7da410 100644
(file)
--- a/
JVM/Converter.hs
+++ b/
JVM/Converter.hs
@@
-14,15
+14,11
@@
import Data.List
import Data.Word
import Data.Bits
import Data.Binary
import Data.Word
import Data.Bits
import Data.Binary
-import Data.Char
-import Data.String
import qualified Data.ByteString.Lazy as B
import Data.Array
import qualified Data.Set as S
import qualified Data.Map as M
import qualified Data.ByteString.Lazy as B
import Data.Array
import qualified Data.Set as S
import qualified Data.Map as M
-import Debug.Trace
-
import JVM.ClassFile
import JVM.Types
import JVM.ClassFile
import JVM.Types
diff --git
a/disassemble.hs
b/disassemble.hs
index d4b9a1b5d9cb807c77098b6f03588d13c85b01b4..bb6512f6ad3a7a80b214720e9613019d6429a44c 100644
(file)
--- a/
disassemble.hs
+++ b/
disassemble.hs
@@
-1,4
+1,6
@@
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE OverloadedStrings #-}
+module Main where
+
import Control.Monad
import Data.Array
import System.Environment
import Control.Monad
import Data.Array
import System.Environment