Changeset 8311


Ignore:
Timestamp:
12/29/04 01:25:17 (17 years ago)
Author:
piso
Message:

ishl, ishr, iand, land

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/opcodes.lisp

    r8306 r8311  
    22;;;
    33;;; Copyright (C) 2003-2004 Peter Graves
    4 ;;; $Id: opcodes.lisp,v 1.16 2004-12-28 02:09:27 piso Exp $
     4;;; $Id: opcodes.lisp,v 1.17 2004-12-29 01:25:17 piso Exp $
    55;;;
    66;;; This program is free software; you can redistribute it and/or
     
    157157(define-opcode fneg 118 1 nil)
    158158(define-opcode dneg 119 1 nil)
    159 (define-opcode ishl 120 1 nil)
     159(define-opcode ishl 120 1 -1)
    160160(define-opcode lshl 121 1 -1)
    161 (define-opcode ishr 122 1 nil)
     161(define-opcode ishr 122 1 -1)
    162162(define-opcode lshr 123 1 -1)
    163163(define-opcode iushr 124 1 nil)
    164164(define-opcode lushr 125 1 nil)
    165 (define-opcode iand 126 1 nil)
    166 (define-opcode land 127 1 nil)
     165(define-opcode iand 126 1 -1)
     166(define-opcode land 127 1 -2)
    167167(define-opcode ior 128 1 nil)
    168168(define-opcode lor 129 1 nil)
Note: See TracChangeset for help on using the changeset viewer.