aboutsummaryrefslogtreecommitdiff
path: root/compiler/standardClient.ey
diff options
context:
space:
mode:
authorDrahflow <drahflow@gmx.de>2014-01-08 14:51:54 +0100
committerDrahflow <drahflow@gmx.de>2014-01-08 14:51:54 +0100
commit481d950d8a5d53dc465fab61fbd3ae5a3d393fc1 (patch)
tree70a6bb6daad07d1725e48d3ce90b609fbf6eba75 /compiler/standardClient.ey
parent90d664bc9e77530113c9a65bd02bae4667a2c25c (diff)
Freeing heap type markers 2-3 for scalars (floats)
Diffstat (limited to 'compiler/standardClient.ey')
-rw-r--r--compiler/standardClient.ey16
1 files changed, 8 insertions, 8 deletions
diff --git a/compiler/standardClient.ey b/compiler/standardClient.ey
index 1fb102f..801a003 100644
--- a/compiler/standardClient.ey
+++ b/compiler/standardClient.ey
@@ -505,8 +505,8 @@
object sys .typed .type [
literal # integer
literal # string
- literal # scope
- invalid # name table
+ unknown
+ unknown
invalid # extension area
{ object sys .typed .inputs ==in
in len 1 neq { "multi-input function in typeStack" die } rep
@@ -518,8 +518,8 @@
invalid # function code
{ [ 1 0 object len 1 sub ] 0 object * typeStackInternal } # array
invalid # function type
- unknown
- unknown
+ literal # scope
+ invalid # name table
unknown
unknown
unknown
@@ -792,8 +792,8 @@
sys .typed .type [
{ o base16encode64 sys .err .writeall } # integer
{ "\"" o "\"" cat cat sys .err .writeall } # string
- { "<scope: " o sys .asm .rawAddress base16encode64 cat ">" cat sys .err .writeall }
- invalid # name table
+ unknown
+ unknown
invalid # extension area
{ "<function: " o sys .asm .rawAddress base16encode64 cat ">" cat sys .err .writeall }
{ "<function code: " o sys .asm .rawAddress base16encode64 cat ">" cat sys .err .writeall }
@@ -803,8 +803,8 @@
"" indent { " " cat } rep "]" cat sys .err .writeall
} # array
invalid # function type
- unknown
- unknown
+ { "<scope: " o sys .asm .rawAddress base16encode64 cat ">" cat sys .err .writeall }
+ invalid # name table
unknown
unknown
unknown