X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=Java%2FIO.hs;h=20aeada67077304376660460d748dce43c63e12d;hb=HEAD;hp=e3a29977407d75c013c3b11f8eaf31b015a17d41;hpb=5f0e7d26a4a5c125b8f68539505d831352e9515b;p=hs-java.git diff --git a/Java/IO.hs b/Java/IO.hs index e3a2997..20aeada 100644 --- a/Java/IO.hs +++ b/Java/IO.hs @@ -1,25 +1,29 @@ {-# LANGUAGE OverloadedStrings #-} +-- | This module exports definitions for some most used classes and methods from standard Java java.io package. module Java.IO where import Data.String +import JVM.Common () -- import instances only import JVM.ClassFile -import JVM.Types import qualified Java.Lang +-- | java.io.PrintStream class name printStream :: IsString s => s printStream = "java/io/PrintStream" +-- | java.io.PrintStream class as field type +printStreamClass :: FieldType printStreamClass = ObjectType printStream -println :: NameType Method +println :: NameType (Method Direct) println = NameType "println" $ MethodSignature [Java.Lang.stringClass] ReturnsVoid -out :: NameType Field +out :: NameType (Field Direct) out = NameType "out" printStreamClass -printf :: NameType Method +printf :: NameType (Method Direct) printf = NameType "printf" $ MethodSignature [Java.Lang.stringClass, Array Nothing Java.Lang.objectClass] (Returns printStreamClass)