Add CI + test

Author: cknitt

.github/workflows/ci.yml

@@ -0,0 +1,56 @@
+name: CI
+
+on:
+ push:
+ branches: [master]
+ # See https://docs.github.com/en/actions/using-workflows/workflow-syntax-for-github-actions#filter-pattern-cheat-sheet
+ tags:
+ - "v[0-9]+.[0-9]+.[0-9]+"
+ - "v[0-9]+.[0-9]+.[0-9]+-*"
+
+ pull_request:
+ branches: [master]
+
+concurrency:
+ group: ci-${{ github.ref }}-1
+ # Cancel previous builds for pull requests only.
+ cancel-in-progress: ${{ github.event_name == 'pull_request' }}
+
+jobs:
+ build:
+ strategy:
+ fail-fast: false
+ matrix:
+ os: [
+ macos-13, # x64
+ macos-14, # ARM
+ ubuntu-latest, # x64
+ buildjet-2vcpu-ubuntu-2204-arm, # ARM
+ windows-latest,
+ ]
+
+ runs-on: ${{matrix.os}}
+
+ steps:
+ - name: Checkout
+ uses: actions/checkout@v4
+
+ - name: Use Node.js
+ uses: actions/setup-node@v4
+ with:
+ node-version: 18
+
+ - name: NPM install
+ run: npm ci
+
+ - name: Build
+ run: npx rescript
+
+ - name: Test
+ env:
+ CI: 1
+ shell: bash
+ run: |
+ npm pack
+ npm i -g ./create-rescript-app-*.tgz
+ npx create-rescript-app

src/CI.res

@@ -0,0 +1,6 @@
+@val @scope("process.env") external ci: string = "CI"
+
+let isRunningInCI = switch ci {
+| "1" | "true" | "TRUE" => true
+| _ => false
+}

src/CI.resi

@@ -0,0 +1 @@
+let isRunningInCI: bool

src/Main.res

@@ -35,7 +35,11 @@ https://rescript-lang.org`,
  let rescriptJsonPath = Path.join2(Process.cwd(), "rescript.json")
  let bsconfigJsonPath = Path.join2(Process.cwd(), "bsconfig.json")
 
- if Fs.existsSync(rescriptJsonPath) || Fs.existsSync(bsconfigJsonPath) {
+ if CI.isRunningInCI {
+ P.note(~title="CI Mode", ~message="Running in CI, will create a test project")
+ await NewProject.createNewProject()
+ P.outro("CI test completed successfully.")
+ } else if Fs.existsSync(rescriptJsonPath) || Fs.existsSync(bsconfigJsonPath) {
  ExistingRescriptProject.showUpgradeHint()
  P.outro("No changes were made to your project.")
  } else if Fs.existsSync(packageJsonPath) {

src/NewProject.res

@@ -51,21 +51,7 @@ let getTemplateOptions = () =>
  hint: shortDescription,
  })
 
-let createNewProject = async () => {
- P.note(~title="New Project", ~message=newProjectMessage)
-
- let projectName = await P.text({
- message: "What is the name of your new ReScript project?",
- placeholder: "my-rescript-app",
- initialValue: ?Process.argv[2],
- validate: validateProjectName,
- })->P.resultOrRaise
-
- let templateName =
- await P.select({message: "Select a template", options: getTemplateOptions()})->P.resultOrRaise
-
- let versions = await RescriptVersions.promptVersions()
-
+let createProject = async (~templateName, ~projectName, ~versions) => {
  let templatePath = CraPaths.getTemplatePath(~templateName)
  let projectPath = Path.join2(Process.cwd(), projectName)
 
@@ -85,3 +71,30 @@ let createNewProject = async () => {
 
  s->P.Spinner.stop("Project created.")
 }
+
+let createNewProject = async () => {
+ P.note(~title="New Project", ~message=newProjectMessage)
+
+ if CI.isRunningInCI {
+ // type versions = {rescriptVersion: string, rescriptCoreVersion: string}
+ await createProject(
+ ~templateName="rescript-template-basic",
+ ~projectName="test",
+ ~versions={rescriptVersion: "11.1.1", rescriptCoreVersion: "1.5.0"},
+ )
+ } else {
+ let projectName = await P.text({
+ message: "What is the name of your new ReScript project?",
+ placeholder: "my-rescript-app",
+ initialValue: ?Process.argv[2],
+ validate: validateProjectName,
+ })->P.resultOrRaise
+
+ let templateName =
+ await P.select({message: "Select a template", options: getTemplateOptions()})->P.resultOrRaise
+
+ let versions = await RescriptVersions.promptVersions()
+
+ await createProject(~templateName, ~projectName, ~versions)
+ }
+}