The jvm package

[ Tags: benchmark, bsd3, ffi, java, jvm, library ] [ Propose Tags ]

Please see README.md.


[Skip to Readme]

Properties

Versions 0.1, 0.1.1, 0.1.2, 0.2.0, 0.2.1, 0.2.2, 0.3.0
Dependencies base (>=4.7 && <5), bytestring (>=0.10), choice (>=0.1), constraints (>=0.8), distributed-closure (>=0.3), exceptions (>=0.8), jni (>=0.4.0), singletons (>=2.0), text (>=1.2), vector (>=0.11) [details]
License BSD3
Copyright 2015-2016 EURL Tweag.
Author Tweag I/O
Maintainer m@tweag.io
Category FFI, JVM, Java
Home page http://github.com/tweag/inline-java/tree/master/jvm#readme
Source repository head: git clone https://github.com/tweag/inline-java(jvm)
Uploaded Thu Aug 31 14:43:58 UTC 2017 by FacundoDominguez
Distributions LTSHaskell:0.2.2, NixOS:0.3.0
Downloads 326 total (20 in the last 30 days)
Rating 0.0 (0 ratings) [clear rating]
  • λ
  • λ
  • λ
Status Docs not available [build log]
All reported builds failed as of 2017-08-31 [all 3 reports]
Hackage Matrix CI

Modules

  • Language
    • Language.Java

Downloads

Maintainer's Corner

For package maintainers and hackage trustees


Readme for jvm-0.3.0

[back to package description]

jvm: Call any JVM function from Haskell

jvm on Stackage LTS jvm on Stackage Nightly

This package enables calling any JVM function from Haskell. If you'd like to call JVM methods using Java syntax and hence get the Java compiler to scope check and type check all your foreign calls, see inline-java, which builds on top of this package.

Example

Graphical Hello World using Java Swing:

{-# LANGUAGE DataKinds #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedStrings #-}

import Data.Text (Text)
import Language.Java

newtype JOptionPane = JOptionPane (J ('Class "javax.swing.JOptionPane"))
instance Coercible JOptionPane ('Class "javax.swing.JOptionPane")

main :: IO ()
main = withJVM [] $ do
    message <- reflect ("Hello World!" :: Text)
    callStatic
      (classOf (undefined :: JOptionPane))
      "showMessageDialog"
      [JObject nullComponent, JObject (upcast message)]
  where
    nullComponent :: J ('Class "java.awt.Component")
    nullComponent = jnull