From 48cf82bfc6cd65cc95f7658582fc532602a85ac0 Mon Sep 17 00:00:00 2001 From: Paul Buetow Date: Tue, 4 Nov 2008 20:42:29 +0000 Subject: few more make fules. --- tmp/test.fy | 30 +++--------------------------- 1 file changed, 3 insertions(+), 27 deletions(-) (limited to 'tmp/test.fy') diff --git a/tmp/test.fy b/tmp/test.fy index 3ffb105..609f0c2 100644 --- a/tmp/test.fy +++ b/tmp/test.fy @@ -1,32 +1,8 @@ #* - * Examples of how to use synonyms + * Examples of how to use references *# -# Create a variable foo, and bar is a synonym for foo +# Create a variable foo, and bar is a reference to foo my foo = "foo"; -my bar = \foo; - -# Reset the value of foo -foo = "bar"; - -# The synonym variable should now also set to "bar" -assert "bar" == say bar; - -# Create a new procedure baz -proc baz { - say "I am baz"; -} - -# Make a synonym baz, and undefine baz -my bay = \baz; -undef baz; - -# bay still has a reference of the original procedure baz -bay; # this prints aut "I am baz" - -assert 0 == defined baz; -assert 1 == defined bay; - -# This removes the procedure from memory -undef bay; +my bar = &foo; -- cgit v1.2.3