एआरएम पर आईओएस ऐप्स में स्क्रिप्ट इंजन के रूप में हास्केल को एम्बेड करने की सिफारिश?

Question

मैंने कुछ महीने पहले हास्केल को आईओएस ऐप में संकलित करने की कोशिश की थी। दुर्भाग्य से केवल स्थिर/बनाए रखा कार्यान्वयन जो मुझे मिल सकता है वह जीएचसी था, इसलिए मैंने कुछ प्रकार के क्रॉस-संकलन की कोशिश की, लेकिन एआरएम/आईओएस के लिए आरटीएस की अनुपस्थिति के कारण विफल रही।

मुझे एहसास हुआ कि यह मेरे लिए काफी आसान नहीं है। तो मैं इसके लिए कुछ सिफारिशों का अनुरोध कर रहा हूं। मुझे पता है कि आईओएस के लिए एक पैच है, लेकिन यह अब जारी नहीं है। मैंने एनएचसी/वाईएचसी माना, लेकिन मैं गिराए गए कार्यान्वयन का उपयोग नहीं कर सका। अगर मैं गलत सोच रहा हूं, तो कृपया मुझे सही करें।

Answer 1

यह काफी GHC-iPhone और Foreign Function Interface

संदर्भ के लिए का उपयोग कर के लिए आसान है, डेविड पोलाक एक उदाहरण एक लिस्प हास्केल में लिखा दुभाषिया को लागू किया है, एक iPad ऐप्लिकेशन के अंदर चल रहा है:

https://github.com/dpp/LispHaskellIPad

main.m में हास्केल मुख्य घोषित करने वाला एक उदाहरण:

extern int Haskell_main(int argc, char* argv[]); 

int main(int argc, char* argv[]) 
{ 
    Haskell_main(argc, argv); 
} 

और में अपने Main.hs, उसे कोको libs में पहुंच प्रदान करना विदेशी समारोह घोषणाओं की एक श्रृंखला:

foreign import ccall safe "openWindow" openWindow 
     :: IO CInt 

data ViewController_struct 
type ViewController = Ptr ViewController_struct 


type RunStr = ViewController -> CString -> IO() 
foreign import ccall safe "wrapper" wrapFuncInvoke :: RunStr -> IO (FunPtr RunStr) 
foreign import ccall safe "setLispEval" setLispEval :: ViewController -> FunPtr RunStr -> IO() 

foreign import ccall safe "addToResult" addToResult :: ViewController -> CString -> IO() 

data ObjCId_struct 
type ObjCId = Ptr ObjCId_struct 

data ObjCSEL_struct 
type ObjCSEL = Ptr ObjCSEL_struct 

foreign import ccall safe "objc_msgSend" objc_msgSend :: ObjCId -> ObjCSEL -> IO ObjCId 
foreign import ccall safe "objc_msgSend" objc_msgSendInt :: ObjCId -> ObjCSEL -> Int -> IO ObjCId 
foreign import ccall safe "sel_registerName" sel_registerName :: CString -> IO ObjCSEL 
foreign import ccall safe "objc_lookUpClass" objc_lookUpClass :: CString -> IO ObjCId