type assertion in type switch nad AST pri 1. prehodu

ass3/zbirnik/parsing/input.asm

@@ -1,44 +1,32 @@
-arithr START 0 .komentar1
-    LDX #10
-    SHIFTR A, 10, X
-    LDS #11  .komentar2
-    LDT #5
-    .komentar3
-    LDA ZERO
-    ADDR S, A
-    ADDR T, A
-    STA sum 
-    
-    .komentar4
-    LDA ZERO 
-    ADDR S, A 
-    SUBR T, A
+arith START 0
+    LDA x 
+    ADD y 
+    STA sum
+    LDA x
+    SUB y
     STA diff
-
-    LDA ZERO 
-    ADDR S, A
-    MULR T, A
+    
+    LDA x
+    MUL y
     STA prod
-
-    LDA ZERO 
-    ADDR S, A
-    DIVR T, A
+    
+    LDA x
+    DIV y
     STA quot
 
-    LDA ZERO
-    ADDR S, A
-LOOP SUBR T, A .komentar5
-    COMPR A, T
-    JGT LOOP
-    JEQ LOOP
-    STA mod 
-HALT J HALT 
-    END arithr
+    LDA y
+    MUL quot
+    STA mod
+    LDA x
+    SUB mod 
+    STA mod
+HALT J HALT
+    END arith
 
-ZERO WORD 0 
+x WORD 11
+y WORD 5
 sum RESW 1
 diff RESW 1
 prod RESW 1
-quot RESW 1 .komentar6
+quot RESW 1
 mod RESW 1
-.komentar7