From 6d8d0fd51a3b16837b8d38ecedd37306395ead15 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ond=C5=99ej=20Hru=C5=A1ka?= <ondra@ondrovo.com>
Date: Thu, 1 Oct 2020 23:31:42 +0200
Subject: [PATCH] show unsym and undef in the aliases example

---
 examples/aliases.csn | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/examples/aliases.csn b/examples/aliases.csn
index 86845c8..da80878 100644
--- a/examples/aliases.csn
+++ b/examples/aliases.csn
@@ -1,10 +1,17 @@
 (
+    (def FOO 777)
+    (undef FOO)
+
     (def FOO 123) ; define a constant
     (call my-add 7 8)
     (cmp res0 138 (ne? (fault "assert failed")))
     (halt)
+    (sym wwww r0)
 
     (proc my-add a b ; give arguments names
+        (sym q r7)
+        (unsym q)
+
         (sym q r0) ; give register a temporary alias
         (add q a b)
         (add q FOO)