From ddd2057ff48555e8a7ef99084f45f52ec07bd40b Mon Sep 17 00:00:00 2001
From: hugova <hugova@kth.se>
Date: Fri, 2 May 2025 22:02:55 +0200
Subject: [PATCH] add hinting for user side compiler

---
 wip-hugo/routines/memory/pixel_draw.s | 2 +-
 wip-hugo/routines/text/char_draw.s    | 4 ++--
 wip-hugo/routines/triangle/triangle.s | 2 +-
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/wip-hugo/routines/memory/pixel_draw.s b/wip-hugo/routines/memory/pixel_draw.s
index f13020f..a8b3611 100755
--- a/wip-hugo/routines/memory/pixel_draw.s
+++ b/wip-hugo/routines/memory/pixel_draw.s
@@ -2,7 +2,7 @@
 
 ;;Screen print. Draws a pixel at a specified position.
 ;; Destroys A X Y
-.proc pixel_draw; Draws a pixel at  [Y = FB , X = FC, FD].  Y = 0 - 320, X= 0 - 200
+.proc pixel_draw;; Draws a pixel at  [Y = FB , X = FC, FD].  Y = 0 - 320, X= 0 - 200
         .include "mem.inc"
         Bitmap = $4000
         Bitmap_end = $5F3F
diff --git a/wip-hugo/routines/text/char_draw.s b/wip-hugo/routines/text/char_draw.s
index 802f23d..9b8ebf4 100644
--- a/wip-hugo/routines/text/char_draw.s
+++ b/wip-hugo/routines/text/char_draw.s
@@ -4,7 +4,7 @@
 ;; Takes in a PETSKI-code in CODE
 ;; And prints it ON X_pos, Y_pos
 ;; Note that this is the real positions divided by 8
-.proc char_draw
+.proc char_draw; user-procedure :clobbers (A Y) :clobbers-arguments (0 3)
         Character_generator_ROM = $D000
         Y_pos_offset = $F9    ; 16-bit value (uses F8), reuses from Y_pos
         X_pos_offset = $FA    ; 16-bit value (uses F7)
@@ -24,7 +24,7 @@
         STA Y_pos
 
         ;;Do arithimatic to know where to read and write bytes.
-        initial:
+initial:
         ;We first need to clear some memory
         LDA #$00
         STA petski_position + 1
diff --git a/wip-hugo/routines/triangle/triangle.s b/wip-hugo/routines/triangle/triangle.s
index 3615df3..099a8dc 100644
--- a/wip-hugo/routines/triangle/triangle.s
+++ b/wip-hugo/routines/triangle/triangle.s
@@ -1,7 +1,7 @@
 ;;; -*- Mode: asm; indent-tabs-mode: t; tab-width: 8 -*-
 
 ;; Subroutine for drawing a filld triangle.
-.proc triangle
+.proc triangle; user-procedure :clobbers (A X Y) :clobbers-arguments 6
         ;; It takes in values from A_X, A_Y, B_X, B_Y C_X, C_Y, see triangle.inc
         .include "triangle.inc"