add more log

Author: aspeddro

src/common/CompilerManagerHook.res

@@ -90,10 +90,13 @@ module Semver = {
   }
 
   let toString = ({major, minor, patch, preRelease}) => {
+    Js.log((major, minor, patch, preRelease))
     let mainVersion = `v${major->Belt.Int.toString}.${minor->Belt.Int.toString}.${patch->Belt.Int.toString}`
 
     switch preRelease {
-    | None => mainVersion
+    | None =>
+      Js.log("toString: preRelease == None")
+      mainVersion
     | Some(identifier) =>
       let identifier = switch identifier {
       | Dev(number) => `dev.${number->Belt.Int.toString}`
@@ -102,6 +105,8 @@ module Semver = {
       | Rc(number) => `rc.${number->Belt.Int.toString}`
       }
 
+      Js.log(("toString: preRelease not None", mainVersion, identifier))
+
       `${mainVersion}-${identifier}`
     }
   }