VirtualBox

source: vbox/trunk/src/VBox/Devices/BiosCommonCode/__U8LS.asm@ 103914

Last change on this file since 103914 was 98103, checked in by vboxsync, 21 months ago

Copyright year updates by scm.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 1.7 KB
Line 
1; $Id: __U8LS.asm 98103 2023-01-17 14:15:46Z vboxsync $
2;; @file
3; Compiler support routines.
4;
5
6;
7; Copyright (C) 2012-2023 Oracle and/or its affiliates.
8;
9; This file is part of VirtualBox base platform packages, as
10; available from https://www.virtualbox.org.
11;
12; This program is free software; you can redistribute it and/or
13; modify it under the terms of the GNU General Public License
14; as published by the Free Software Foundation, in version 3 of the
15; License.
16;
17; This program is distributed in the hope that it will be useful, but
18; WITHOUT ANY WARRANTY; without even the implied warranty of
19; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
20; General Public License for more details.
21;
22; You should have received a copy of the GNU General Public License
23; along with this program; if not, see <https://www.gnu.org/licenses>.
24;
25; SPDX-License-Identifier: GPL-3.0-only
26;
27
28
29;*******************************************************************************
30;* Exported Symbols *
31;*******************************************************************************
32public __U8LS
33
34
35 .8086
36
37_TEXT segment public 'CODE' use16
38 assume cs:_TEXT
39
40;;
41; 64-bit left shift.
42;
43; @param ax:bx:cx:dx Value. (AX is the most significant, DX the least)
44; @param si Shift count.
45; @returns ax:bx:cx:dx Shifted value.
46; si is zeroed
47;
48__U8LS:
49
50 test si, si
51 jz u8ls_quit
52u8ls_rot:
53 shl dx, 1
54 rcl cx, 1
55 rcl bx, 1
56 rcl ax, 1
57 dec si
58 jnz u8ls_rot
59u8ls_quit:
60 ret
61
62
63_TEXT ends
64 end
65
Note: See TracBrowser for help on using the repository browser.

© 2024 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette