l1, libs: replaced "(SET-DOES>)" with more logical "(!DOES>)" (this hints at argument...
[urforth.git] / libs / asmx86 / instrs / p5.f
blob38032c9be2754f639b849c8458ca76a662b8d3bb
1 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2 ;; UrForth level 1: self-hosting 32-bit Forth compiler
3 ;; Natural-syntax x86 assembler
4 ;; Modelled after SMAL32 built-in assembler
5 ;; Copyright (C) 2020 Ketmar Dark // Invisible Vector
6 ;; GPLv3 ONLY
7 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
8 ;; pentium-ii extended opcodes
9 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
10 $0FB0 $0FB1 P5Op CMPXCHG
11 $0FC0 $0FC1 P5Op XADD