Rename APIInfo to ApiInfo

Author: palas

cardano-wasm/cardano-wasm.cabal

@@ -37,7 +37,7 @@ executable cardano-wasm
     ghc-options:
       -no-hs-main
       -optl-mexec-model=reactor
-      "-optl-Wl,--strip-all,--export=getAPIInfo,--export=newConwayTx,--export=addTxInput,--export=addSimpleTxOut,--export=setFee,--export=addSigningKey,--export=signTx,--export=txToCbor"
+      "-optl-Wl,--strip-all,--export=getApiInfo,--export=newConwayTx,--export=addTxInput,--export=addSimpleTxOut,--export=setFee,--export=addSigningKey,--export=signTx,--export=txToCbor"
   other-modules:
     Cardano.Wasm.Internal.Api.Info
     Cardano.Wasm.Internal.Api.Tx

cardano-wasm/example/cardano-api.js

@@ -37,7 +37,7 @@ async function initialize() {
   }
 
   // Dynamically build the API
-  const apiInfo = await instance.exports.getAPIInfo();
+  const apiInfo = await instance.exports.getApiInfo();
   let makers = {};
   let cardanoAPI = { objectType: "cardano-api" };
   // Create maker functions for each virtual object type

cardano-wasm/src/Cardano/Wasm/Internal/Api/Info.hs

@@ -56,23 +56,23 @@ instance Aeson.ToJSON VirtualObjectInfo where
       ]
 
 -- | Aggregate type for all API information.
-data APIInfo = APIInfo
+data ApiInfo = ApiInfo
   { staticMethods :: [MethodInfo]
   , virtualObjects :: [VirtualObjectInfo]
   }
   deriving (Show, Eq)
 
-instance Aeson.ToJSON APIInfo where
-  toJSON :: APIInfo -> Aeson.Value
-  toJSON (APIInfo staticObjs virtualObjs) =
+instance Aeson.ToJSON ApiInfo where
+  toJSON :: ApiInfo -> Aeson.Value
+  toJSON (ApiInfo staticObjs virtualObjs) =
     Aeson.object
       [ "staticMethods" Aeson..= staticObjs
       , "virtualObjects" Aeson..= virtualObjs
       ]
 
 -- | Provides metadata about the "virtual objects" and their methods.
 -- This is intended to help generate JavaScript wrappers.
-apiInfo :: APIInfo
+apiInfo :: ApiInfo
 apiInfo =
   let unsignedTxObjectName = "UnsignedTx"
       signedTxObjectName = "SignedTx"
@@ -128,7 +128,7 @@ apiInfo =
                   }
               ]
           }
-   in APIInfo
+   in ApiInfo
         { staticMethods = staticApiMethods
         , virtualObjects = [unsignedTxObj, signedTxObj]
         }

cardano-wasm/src/Cardano/Wasm/Internal/JavaScript/Bridge.hs

@@ -88,7 +88,7 @@ jsValToType expectedType val = do
 
 -- * Type Synonyms for JSVal representations
 
-type JSAPIInfo = JSVal
+type JSApiInfo = JSVal
 
 type JSUnsignedTx = JSVal
 
@@ -224,10 +224,10 @@ txToCbor jsSignedTx =
 
 -- * API Information
 
-foreign export javascript "getAPIInfo"
-  getAPIInfo :: IO JSAPIInfo
+foreign export javascript "getApiInfo"
+  getApiInfo :: IO JSApiInfo
 
-getAPIInfo :: IO JSAPIInfo
-getAPIInfo = toJSVal apiInfo
+getApiInfo :: IO JSApiInfo
+getApiInfo = toJSVal apiInfo
 
 #endif