From a7003a8b3e00ff36470f1aeb931919f57cac2039 Mon Sep 17 00:00:00 2001 From: Nathanael Sensfelder Date: Sat, 1 May 2021 23:47:56 +0200 Subject: Updates Blackjack example, adds extra type support. --- data/examples/blackjack/global.fate | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'data/examples/blackjack/global.fate') diff --git a/data/examples/blackjack/global.fate b/data/examples/blackjack/global.fate index a20704e..d08706b 100644 --- a/data/examples/blackjack/global.fate +++ b/data/examples/blackjack/global.fate @@ -6,7 +6,7 @@ (global (lambda text (int)) coins_word) -(set coins_word +(set! coins_word (lambda ((int i)) (if_else (= (var i) 1) (text a single coin) @@ -18,7 +18,7 @@ (declare_text_effect action_description) (define_sequence money_acquisition ((int amount)) - (set player.money (+ player.money amount)) + (set! player.money (+ player.money amount)) (if (> amount 0) (text_effect action_description You acquired (eval coins_word (var amount))! @@ -27,7 +27,7 @@ ) (define_sequence money_loss ((int amount)) - (set player.money (- player.money amount)) + (set! player.money (- player.money amount)) (if (> amount 0) (text_effect action_description You lost (eval coins_word (var amount)). -- cgit v1.2.3-70-g09d2