summaryrefslogtreecommitdiff
path: root/emit.fun
diff options
context:
space:
mode:
authorVladimir Azarov <avm@intermediate-node.net>2025-08-06 05:14:27 +0200
committerVladimir Azarov <avm@intermediate-node.net>2025-08-06 05:14:27 +0200
commit3a3220a049b9fef67ca0f85542654ab0a9de0914 (patch)
tree73a82d2579f74c02fb9a227e66f4ef219d44182f /emit.fun
parenta4c60603f61dd1a9f0ce420be9067965586dd694 (diff)
Most of conversion to il
Diffstat (limited to 'emit.fun')
-rw-r--r--emit.fun8
1 files changed, 1 insertions, 7 deletions
diff --git a/emit.fun b/emit.fun
index cb77061..05e84f0 100644
--- a/emit.fun
+++ b/emit.fun
@@ -55,10 +55,6 @@ functor Emit(I: IL) = struct
fprint `cmd `" " W w %
end
- fun emitScalarIni size w = (
- fprint `"\t" %; dd size w; fprint `"\n" %
- )
-
fun emitAggrLayout id =
let
val (_, size, layout) = D.get P.iniLayouts id
@@ -93,13 +89,11 @@ functor Emit(I: IL) = struct
fun emitLayout (id, _, t, ini, _) =
let
val align = P.alignOfType t
- val size = P.sizeOfType t
val () = fprinttn `"align\t" W align %
val () = fprint PP.? id `":" %
in
case ini of
- P.CiniConst w => emitScalarIni size w
- | P.CiniLayout id => emitAggrLayout id
+ P.CiniLayout id => emitAggrLayout id
| P.CiniExpr _ => raise Unreachable
end
in