add toogle command to do it automtically

Author: bobzhang

jscomp/cleanlib.js

@@ -1,11 +1,15 @@
 #!/usr/bin/env node
 var cp = require('child_process')
 var fs = require('fs')
+exports.run = function () {
+    cp.execSync(`make clean`)
+    if (fs.existsSync(`stdlib-406`)) {
+        cp.execSync(`git clean -dfx stdlib-406`)
+    }
 
-cp.execSync(`make clean`)
-if(fs.existsSync(`stdlib-406`)){
-    cp.execSync(`git clean -dfx stdlib-406`)
+    cp.execSync(`git clean -dfx stdlib-402 test others runtime`)
 }
 
-cp.execSync(`git clean -dfx stdlib-402 test others runtime`)
-
+if(require.main === module){
+    run()
+}

jscomp/switch.js

@@ -0,0 +1,42 @@
+#!/usr/bin/env node
+var fs = require('fs')
+var path = require('path')
+
+
+var clean = require('./cleanlib.js')
+function toggleMakefile() {
+    var filename = path.join(__dirname,'Makefile.shared')
+    var line = fs.readFileSync(filename,'utf8')
+    var toggled = (line.split('\n').map(x => {
+        if (x.startsWith('STDLIB')) {
+            return '# ' + x
+        } else if (x.startsWith('# STDLIB')) {
+            return x.substring(2)
+        }
+        return x
+    }).join('\n'))
+
+    fs.writeFileSync(filename, toggled, 'utf8')
+}
+function toggleSharedMakefile(){
+    var filename = path.join(__dirname, 'test','Makefile')
+    var line = fs.readFileSync(filename,'utf8')
+    var toggled = (line.split('\n').map(x => {
+        if(x.startsWith('	# ocaml_typedtree_test')){
+            return '	ocaml_typedtree_test'
+        } else {
+            if (x.startsWith('	ocaml_typedtree_test')){
+                return '	# ocaml_typedtree_test'
+            }
+        }
+        return x 
+    })).join('\n')
+    fs.writeFileSync(filename,toggled,'utf8')
+}
+
+
+toggleMakefile()
+toggleSharedMakefile()
+clean.run()
+
+