diff options
| author | Bruce Hill <bitbucket@bruce-hill.com> | 2018-04-09 18:58:05 -0700 |
|---|---|---|
| committer | Bruce Hill <bitbucket@bruce-hill.com> | 2018-04-09 18:58:27 -0700 |
| commit | d42d20c50ae0443e2ac5ffa6492ad57745e27830 (patch) | |
| tree | 78585c98ee8f4a3c88179c0d6b38b7f4015571ad /lib/object2.nom | |
| parent | 86925c5b3a2c38ff47eb1764b04394b7d25cd13d (diff) | |
Re-added callstack callsite info. It's a bit hacky, but better than
nothing.
Diffstat (limited to 'lib/object2.nom')
| -rw-r--r-- | lib/object2.nom | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/object2.nom b/lib/object2.nom index 0e8c6fb..e7770bc 100644 --- a/lib/object2.nom +++ b/lib/object2.nom @@ -168,13 +168,13 @@ compile [define object %classname %class_body] to: __lt=\%class_identifier['< %'], __le=\%class_identifier['<= %'], }; - nomsu:define_action("instances of "..\%class_identifier.name, "lib/class.nom", function() + nomsu:define_action("instances of "..\%class_identifier.name, "lib/class.nom", function(__callsite) return utils.keys(\%class_identifier.instances); end, ""); - nomsu:define_action("new "..\%class_identifier.name.." %instance", "lib/class.nom", function(_instance) + nomsu:define_action("new "..\%class_identifier.name.." %instance", "lib/class.nom", function(__callsite, _instance) return \%class_identifier(_instance); end, ""); - nomsu:define_action("new "..\%class_identifier.name, "lib/class.nom", function() + nomsu:define_action("new "..\%class_identifier.name, "lib/class.nom", function(__callsite) return \%class_identifier({}); end, ""); end -- End of definition of \%class_identifier |