diff options
| author | admin (centauri.fritz.box) <puppet@mx.buetow.org> | 2014-06-30 23:53:04 +0200 |
|---|---|---|
| committer | admin (centauri.fritz.box) <puppet@mx.buetow.org> | 2014-06-30 23:53:04 +0200 |
| commit | adc4b59a3e7c9db6f33670164490830d87331228 (patch) | |
| tree | adc5d21856852bfb5c3cca794a9c07ad476d877e /examples/synonyms.fy | |
| parent | 63cf3028445d8d213ffc774f77aafd7283cb4fbd (diff) | |
| parent | 5ab5de91eb0ae6ed9db78a2c8c47ec67f105e504 (diff) | |
Mergebuild-010393-lambda
Diffstat (limited to 'examples/synonyms.fy')
| -rw-r--r-- | examples/synonyms.fy | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/examples/synonyms.fy b/examples/synonyms.fy deleted file mode 100644 index 0dd30f5..0000000 --- a/examples/synonyms.fy +++ /dev/null @@ -1,37 +0,0 @@ -#* - * Examples of how to use synonyms - *# - -# Create a variable foo, and bar is a synonym for 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; - -# Should be the num of syms for the same value -assert 2 == syms baz; -assert 2 == syms bay; -undef baz; -assert 1 == syms bay; - -# 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; - |
