Fix compiler crashes and improve return statements. (#652)

* fix a few small bugs

* fi

* fix merge conflict
This commit is contained in:
water111
2021-06-30 00:11:46 -04:00
committed by GitHub
parent 7e7f10ed3a
commit 322a4ed9b2
16 changed files with 332 additions and 293 deletions
@@ -11,8 +11,8 @@
:size-assert #x8
:flag-assert #xb00000008
(:methods
(set-private-assert-info (_type_ string uint16 uint16) int 9)
(print-private-assert-info (_type_) int 10)
(set-pos (_type_ string uint uint) int 9)
(print-pos (_type_) int 10)
)
)
@@ -30,22 +30,22 @@
;; definition for method 9 of type __assert-info-private-struct
(defmethod
set-private-assert-info
set-pos
__assert-info-private-struct
((obj __assert-info-private-struct)
(filename string)
(line-num uint16)
(column-num uint16)
(line-num uint)
(column-num uint)
)
(set! (-> obj filename) filename)
(set! (-> obj line-num) (the-as uint line-num))
(set! (-> obj column-num) (the-as uint column-num))
(set! (-> obj line-num) line-num)
(set! (-> obj column-num) column-num)
0
)
;; definition for method 10 of type __assert-info-private-struct
(defmethod
print-private-assert-info
print-pos
__assert-info-private-struct
((obj __assert-info-private-struct))
(format