Handle string as data pointer and length in TAC

1 files changed, 1 insertions, 10 deletions

diff --git a/Rakefile b/Rakefile
index 4b0f566..c9a255f 100644
--- a/Rakefile
+++ b/Rakefile
@@ -48,18 +48,9 @@ task :convert do
         current_stage << line
       elsif !seen_proc && line.start_with?('begin')
         current_stage << <<~CODE
-          proc g(location: ElnaLocation)
-          begin
-          \tprintf("# %i %i\\n\\0", location.line, location.column)
-          end
-
           proc f()
-          var
-          \tlocation: ElnaLocation
           begin
-          \tlocation.line := 2;
-          \tlocation.column := 3;
-          \tg(location)
+          \tprintf("# %.*s %p %i\\n\\0".ptr, "location".length, "location".ptr, "location".ptr, "location".length)
           end
 
         CODE