Plaster
New
List
Login
text
apl
aspx
asterisk
brainfuck
c
c++hdr
c++src
cassandra
ceylon
clojure
clojurescript
cmake
cobol
coffeescript
common-lisp
crystal
csharp
css
cypher-query
cython
d
dart
diff
django
dockerfile
dylan
ebnf
ecl
ecmascript
edn
eiffel
ejs
elm
erb
erlang
ez80
factor
fcl
feature
forth
fortran
fragment
gfm
go
gql
groovy
gss
haml
handlebars-template
haskell
haxe
hive
html
http
httpd-php
httpd-php-open
hxml
ini
java
javascript
json
jsp
jsx
julia
kotlin
latex
less
literate-haskell
lua
mariadb
markdown
mbox
mirc
mscgen
msgenny
mssql
mumps
mysql
n-triples
nesc
nginx-conf
nsis
objectivec
octave
oz
pascal
perl
pgp
pgp-keys
pgp-signature
pgsql
php
pig
plsql
properties
protobuf
puppet
python
q
rpm-changes
rpm-spec
rsrc
ruby
rustsrc
sas
sass
scala
scheme
scss
sieve
slim
smarty
solr
soy
sparql-query
spreadsheet
sql
squirrel
stex
styl
swift
systemverilog
tcl
textile
tiddlywiki
tiki
tlv
tornado
ttcn-asn
ttcn-cfg
turtle
twig
typescript
typescript-jsx
vb
vbscript
velocity
verilog
vertex
vhdl
vue
webidl
xml
xml-dtd
xquery
xu
yaml
z80
default
Visibility:
public
unlisted
private
CL-USER> (disassemble (lambda (x) (declare ((simple-array (unsigned-byte 2) 1) x)) (setf (aref x 1) 3))) ; disassembly for (LAMBDA (X)) ; Size: 58 bytes. Origin: #x52C8D9ED ; (LAMBDA (X)) ; 9ED: 498B4510 MOV RAX, [R13+16] ; thread.binding-stack-pointer ; 9F1: 488945F8 MOV [RBP-8], RAX ; 9F5: 488B42F9 MOV RAX, [RDX-7] ; 9F9: 4883F802 CMP RAX, 2 ; 9FD: 7620 JBE L0 ; 9FF: 488B5A01 MOV RBX, [RDX+1] ; A03: B80C000000 MOV EAX, 12 ; A08: 4809C3 OR RBX, RAX ; A0B: 48895A01 MOV [RDX+1], RBX ; A0F: BA03000000 MOV EDX, 3 ; A14: 48D1E2 SHL RDX, 1 ; A17: 488BE5 MOV RSP, RBP ; A1A: F8 CLC ; A1B: 5D POP RBP ; A1C: C3 RET ; A1D: CC10 INT3 16 ; Invalid argument count trap ; A1F: L0: CC23 INT3 35 ; INVALID-ARRAY-INDEX-ERROR ; A21: 08 BYTE #X08 ; RDX ; A22: 01 BYTE #X01 ; RAX ; A23: 86808010 BYTE #X86, #X80, #X80, #X10 ; 1