about summary refs log tree commit diff stats
path: root/js/scripting-lang/scratch_tests/test_first_part.txt
diff options
context:
space:
mode:
Diffstat (limited to 'js/scripting-lang/scratch_tests/test_first_part.txt')
-rw-r--r--js/scripting-lang/scratch_tests/test_first_part.txt48
1 files changed, 0 insertions, 48 deletions
diff --git a/js/scripting-lang/scratch_tests/test_first_part.txt b/js/scripting-lang/scratch_tests/test_first_part.txt
deleted file mode 100644
index 61b2da1..0000000
--- a/js/scripting-lang/scratch_tests/test_first_part.txt
+++ /dev/null
@@ -1,48 +0,0 @@
-/* Test first part of enhanced case statements */
-
-/* ===== FIZZBUZZ IMPLEMENTATION ===== */
-
-/* Classic FizzBuzz using multi-value patterns with expressions */
-fizzbuzz : n ->
-  when (n % 3) (n % 5) is
-    0 0 then "FizzBuzz"
-    0 _ then "Fizz"
-    _ 0 then "Buzz"
-    _ _ then n;
-
-/* Test FizzBuzz implementation */
-fizzbuzz_15 : fizzbuzz 15;  /* Should be "FizzBuzz" */
-fizzbuzz_3 : fizzbuzz 3;    /* Should be "Fizz" */
-fizzbuzz_5 : fizzbuzz 5;    /* Should be "Buzz" */
-fizzbuzz_7 : fizzbuzz 7;    /* Should be 7 */
-
-/* ===== TABLE ACCESS IN WHEN EXPRESSIONS ===== */
-
-/* User data for testing */
-admin_user : {role: "admin", level: 5, name: "Alice"};
-user_user : {role: "user", level: 2, name: "Bob"};
-guest_user : {role: "guest", level: 0, name: "Charlie"};
-
-/* Access control using table access in patterns */
-access_level : user ->
-  when user.role is
-    "admin" then "full access"
-    "user" then "limited access"
-    _ then "no access";
-
-/* Test access control */
-admin_access : access_level admin_user;
-user_access : access_level user_user;
-guest_access : access_level guest_user;
-
-/* Output results */
-..out "FizzBuzz Results:";
-..out fizzbuzz_15;
-..out fizzbuzz_3;
-..out fizzbuzz_5;
-..out fizzbuzz_7;
-
-..out "Access Control Results:";
-..out admin_access;
-..out user_access;
-..out guest_access; 
\ No newline at end of file