; std.s
%pragma once
bits 16

; Multiply :: int16 -> int16 -> int16
Multiply:
    enter 0,0
    push bx
    push dx

    mov ax,[bp+4]
    mov bx,[bp+6]

    xor dx,dx
    mul bx

    pop dx
    pop bx

    clc
    leave
    ret
