Mercurial > repos > tabletprog
annotate samples/compilerbug_004.tp @ 201:d2e0664ba73e
Don't allow assignments to module variables
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Wed, 28 Aug 2013 01:05:14 -0700 |
parents | 38127fbf5f9d |
children |
rev | line source |
---|---|
64
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
1 #{ |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
2 foo <- 42 |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
3 new <- { |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
4 #{ |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
5 bar <- foo |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
6 } |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
7 } |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
8 |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
9 main <- { |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
10 print: (string: ((new: ) bar)) . "\n" |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
11 } |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
12 |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
13 } |
38127fbf5f9d
Add sample for bug involving accesing a property of a parent object as an initial value for a new object property
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
14 |