projects
/
hs-java.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Misc minor updates.
[hs-java.git]
/
JVM
/
Builder.hs
diff --git
a/JVM/Builder.hs
b/JVM/Builder.hs
index f905ab6af5f9f38094ffdec5a84498b51b617e11..155455f6f89d2abefb9a7043283b5e90935f6bf7 100644
(file)
--- a/
JVM/Builder.hs
+++ b/
JVM/Builder.hs
@@
-1,9
+1,18
@@
module JVM.Builder
(module JVM.Builder.Monad,
module JVM.Builder
(module JVM.Builder.Monad,
- module JVM.Builder.Instructions)
- where
+ module JVM.Builder.Instructions,
+ arrayOf, sizedArray
+ ) where
+
+import JVM.ClassFile
import JVM.Builder.Monad
import JVM.Builder.Instructions
import JVM.Builder.Monad
import JVM.Builder.Instructions
+arrayOf :: FieldType -> FieldType
+arrayOf t = Array Nothing t
+
+sizedArray :: Int -> FieldType -> FieldType
+sizedArray n t = Array (Just n) t
+