Merge pull request #237 from roc-lang/all_syntax_file

all syntax demo

Author: Anton-4

ci_scripts/all_tests.sh

@@ -39,6 +39,9 @@ expect ci_scripts/expect_scripts/Parser.exp
 
 $ROC test ./examples/PatternMatching/PatternMatching.roc
 
+$ROC build ./examples/AllSyntax/main.roc
+expect ci_scripts/expect_scripts/AllSyntax.exp
+
 $ROC build ./examples/RandomNumbers/main.roc
 expect ci_scripts/expect_scripts/RandomNumbers.exp
 

ci_scripts/check_format.sh

@@ -17,9 +17,8 @@ if [ -z "${ROC}" ]; then
 fi
 
 # array of paths to exclude from format check
-# TODO: remove the exclusion of examples/Tasks/main.roc when
-# https://github.com/roc-lang/roc/issues/6074 is done
-excludes=( './examples/Tasks/main.roc' './roc_nightly/' )
+# AllSyntax: The formatter changes `||`` into `or`, and we want to demonstrate both in the example
+excludes=( './examples/AllSyntax/main.roc' './roc_nightly/' )
 
 # Start the find command and loop through excludes to add them
 find_command="find . -name '*.roc'"

ci_scripts/expect_scripts/AllSyntax.exp

@@ -0,0 +1,54 @@
+#!/usr/bin/expect
+
+# uncomment line below for debugging
+# exp_internal 1
+
+set timeout 7
+
+source ./ci_scripts/expect_scripts/shared-code.exp
+
+spawn ./examples/AllSyntax/main
+
+set expected_output [normalize_output {
+\{diff: 5, div: 2, div_trunc: 2, eq: Bool.false, gt: Bool.true, gteq: Bool.true, lt: Bool.false, lteq: Bool.false, neg: -10, neq: Bool.true, prod: 50, rem: 0, sum: 15\}
+\{bool_and: Bool.false, bool_and_keyword: Bool.false, bool_or: Bool.true, bool_or_keyword: Bool.true, not_a: Bool.false\}
+"Pizza Roc"
+42
+Hello, Venus!This is a multiline string.
+You can call functions inside $... too: 2
+Unicode escape sequence:  
+"Success"
+Hello, world!
+Hello, world!
+Hello, world!
+Hello, world!
+Hello, world!
+(Ok \{\})
+"False"
+("Roc", 1)
+Red
+\[1, 2\]
+(TagFour 42)
+default
+("Roc", 1, 1, 1)
+\{x: 1, y: 3\}
+44
+\[./examples/AllSyntax/main.roc:121\] a = 42
+\[./examples/AllSyntax/main.roc:124\] 43 = 43
+\{\}
+4
+(5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5.0, 5, 5, 5)
+Rocco
+42
+99
+(Ok \{age: 25, city: "NYC", name: "Alice"\})
+Bool.true
+}]
+
+expect $expected_output {
+    expect eof {
+        check_exit_and_segfault
+    }
+}
+puts stderr "\nError: output was different from expected value."
+exit 1

examples/AllSyntax/README.md

@@ -0,0 +1,50 @@
+# All Syntax File
+
+Demonstrates all Roc syntax in a single app file. See [all module types](https://roc-lang.org/tutorial#modules) to view syntax examples for the non-app headers.
+
+## Code
+```roc
+file:main.roc
+```
+
+## Output
+
+Run this from the directory that has `main.roc` in it:
+
+```
+$ roc main.roc
+{diff: 5, div: 2, div_trunc: 2, eq: Bool.false, gt: Bool.true, gteq: Bool.true, lt: Bool.false, lteq: Bool.false, neg: -10, neq: Bool.true, prod: 50, rem: 0, sum: 15}
+{bool_and: Bool.false, bool_and_keyword: Bool.false, bool_or: Bool.true, bool_or_keyword: Bool.true, not_a: Bool.false}
+"Pizza Roc"
+42
+Hello, Venus!This is a multiline string.
+You can call functions inside $... too: 2
+Unicode escape sequence:  
+"Success"
+Hello, world!
+Hello, world!
+Hello, world!
+Hello, world!
+Hello, world!
+(Ok {})
+"False"
+("Roc", 1)
+Red
+[1, 2]
+(TagFour 42)
+default
+("Roc", 1, 1, 1)
+{x: 1, y: 3}
+44
+[./examples/AllSyntax/main.roc:119] a = 42
+[./examples/AllSyntax/main.roc:122] 43 = 43
+{}
+4
+(5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5.0, 5, 5, 5)
+Rocco
+42
+99
+(Ok {age: 25, city: "NYC", name: "Alice"})
+Bool.true
+```
+