-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathHulloPrint.j
38 lines (30 loc) · 851 Bytes
/
HulloPrint.j
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
.class HulloPrint
.super LispSubr
.method public run([LLispObject;)LLispObject;
.limit stack 512
.limit locals 512
; Push java.lang.System.out on stack
getstatic java/lang/System/out Ljava/io/PrintStream;
ldc "kkorejhej"
invokevirtual java/io/PrintStream/println(Ljava/lang/String;)V
getstatic java/lang/System/out Ljava/io/PrintStream;
aload_1
iconst_0
aaload
invokevirtual java/lang/Object.toString()Ljava/lang/String;
invokevirtual java/io/PrintStream/println(Ljava/lang/String;)V
aload_0
; aconst_null
areturn
.end method
;
; standard initializer
.method public <init>()V
.limit stack 100
.limit locals 100
aload_0
ldc "bullkorv"
; invokenonvirtual LispSubr/<init>()V
invokenonvirtual LispSubr/<init>(Ljava/lang/String;)V
return
.end method