Fixing IOS

This commit is contained in:
Bryce Covert
2020-01-07 20:02:29 -08:00
parent a10692099f
commit 7152acd658
4 changed files with 14 additions and 4 deletions

View File

@@ -40,13 +40,11 @@ public class IOSLauncher extends IOSApplication.Delegate {
config.useAccelerometer=false;
config.useCompass=false;
System.out.println("application created.");
/*
HashSet<String> products = new HashSet();
products.add("fullgame");
SKProductsRequest request = new SKProductsRequest(products);
request.setDelegate(new ProductDelegate());
request.start();
*/
RT.var("clojure.core", "require").invoke(Symbol.intern("advent.core"));
RT.var("clojure.core", "require").invoke(Symbol.intern("advent.ios"));

View File

@@ -18,16 +18,28 @@ public class ProductDelegate extends SKProductsRequestDelegateAdapter {
@Override
public void didReceiveResponse(SKProductsRequest request, SKProductsResponse response) {
System.out.println("products request response");
RT.var("clojure.core", "require").invoke(Symbol.intern("advent.ios"));
try {
((IFn) RT.var("advent.ios", "products-did-receive-response").deref()).invoke(request, response);
} catch (Exception e) {
System.out.println(e.toString());
throw e;
}
}
@Override
public void didFail(SKRequest request, NSError error) {
System.out.println("Failed products request");
RT.var("clojure.core", "require").invoke(Symbol.intern("advent.ios"));
((IFn) RT.var("advent.ios", "products-did-fail").deref()).invoke(request, error);
}
@Override
public void didFinish(SKRequest request) {
System.out.println("Finished products request");
RT.var("clojure.core", "require").invoke(Symbol.intern("advent.ios"));
((IFn) RT.var("advent.ios", "products-did-finish").deref()).invoke(request);
}
}