4 files changed, 13 insertions, 15 deletions

diff --git a/data/examples/blackjack/cards.fate b/data/examples/blackjack/cards.fate
index f9c734f..b4fa384 100644
--- a/data/examples/blackjack/cards.fate
+++ b/data/examples/blackjack/cards.fate
@@ -1,12 +1,12 @@
 (fate_version 1)
 
-(declare_structure card
+(declare_structure #card
    (text name)
    (int number)
    (int score)
 )
 
-(local (lambda (list card) (string)) card_generator)
+(local (lambda (list #card) (string)) card_generator)
 
 (set! card_generator
    (lambda ( (string family) )
@@ -16,7 +16,7 @@
                (int number)
                (string family)
             )
-            (struct:set_fields (default card)
+            (struct:set_fields (default #card)
                (number (var number))
                (name
                   (text
@@ -39,7 +39,7 @@
    )
 )
 
-(global (list card) deck_template)
+(global (list #card) deck_template)
 
 (list:add_all!
    (eval card_generator Hearts)
@@ -49,9 +49,7 @@
    deck_template
 )
 
-
-
-(define_sequence compute_score (((ptr (list card)) deck) ((ptr int) result))
+(define_sequence compute_score (((ptr (list #card)) deck) ((ptr int) result))
    (local int aces_count 0)
    (local int maybe_better_score 0)
 
diff --git a/data/examples/blackjack/global.fate b/data/examples/blackjack/global.fate
index 760e48a..8365c6f 100644
--- a/data/examples/blackjack/global.fate
+++ b/data/examples/blackjack/global.fate
@@ -2,7 +2,7 @@
 
 (require player.fate)
 
-(global player player)
+(global #player player)
 
 (global (lambda text (int)) coins_word
    (lambda ((int i))
diff --git a/data/examples/blackjack/play.fate b/data/examples/blackjack/play.fate
index 76b9e2b..749ca54 100644
--- a/data/examples/blackjack/play.fate
+++ b/data/examples/blackjack/play.fate
@@ -5,13 +5,13 @@
 (require cards.fate)
 
 (global bool has_played (false))
-(global (list card) current_deck)
-(global (list card) dealer_hand)
+(global (list #card) current_deck)
+(global (list #card) dealer_hand)
 (global int bet)
 (global bool has_doubled)
 
 (define_sequence play_a_game ()
-   (local card new_card)
+   (local #card new_card)
 
    (if (not has_played)
       (text_effect action_description
@@ -171,7 +171,7 @@
 )
 
 (define_sequence acquire_card ()
-   (local card new_card)
+   (local #card new_card)
    (local int player_score)
 
    (list:pop_left! current_deck new_card)
@@ -248,7 +248,7 @@
    (newline)
 
    (while (< dealer_score 17)
-      (local card new_card)
+      (local #card new_card)
 
       (list:pop_left! current_deck new_card)
       (list:add! (var new_card) dealer_hand)
diff --git a/data/examples/blackjack/player.fate b/data/examples/blackjack/player.fate
index 7d8b947..2eec757 100644
--- a/data/examples/blackjack/player.fate
+++ b/data/examples/blackjack/player.fate
@@ -2,8 +2,8 @@
 
 (require cards.fate)
 
-(define_structure player
+(define_structure #player
    (string name)
    (int money)
-   ((list card) hand)
+   ((list #card) hand)
 )