• Home
• ca.mcgill.sable
• jasmin
• 3.0.1
• source code
• typeinfo.class

×

Project download

Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $

You can buy this project and download/modify it how often you want.

scm.typeinfo.class Maven / Gradle / Ivy

????-?
>L	=M	=N	=OP
LQ
RS
	L
T
U
VWXYZ[\]^_
`abc
defghijklmnopqrstuvwxyz{|}~
V??????????
scm_name
Ljava/lang/String;
	java_name

java_inp_type
[Ljava/lang/String;

:(Ljava/lang/String;Ljava/lang/String;[Ljava/lang/String;)V
Code
LineNumberTable
write
(Ljava/io/PrintStream;)V

SourceFile
autogen.javaD??@A@BC
java/lang/StringBuffer
//Autogenerated by typeinfo on ??
java/util/Date???????
	class scm
! extends Procedure implements Obj

{
4  Obj apply(Cell args, Env f)
  throws Exception
  {
    Cell t = args;

    Obj  tmp;
,    if (t == null) { throw new SchemeError("
	 expects ??
 arguments"); }
6    tmp = (t.car!=null)?t.car.eval(f):null; t = t.cdr;
String???
short
int
long
float
double
M    if ((tmp != null) && !(tmp instanceof Selfrep)) { throw new SchemeError("
 expects a String for arg #
"); }
    String arg
' = (tmp!=null)?((Selfrep)tmp).val:null;
<    if (!(tmp instanceof Selfrep)) { throw new SchemeError("
 expects a number for arg #
    
 arg
 = (
")(Math.round(((Selfrep)tmp).num));
)(((Selfrep)tmp).num);
N    if ((tmp != null) && !(tmp instanceof primnode)) { throw new SchemeError("
 expects a 

 for arg #
<    if ((tmp != null) && !((((primnode)tmp).val) instanceof 
)) { throw new SchemeError("
 = (tmp != null)?(
)(((primnode)tmp).val):null;
    return new primnode(new 

(??
arg0
, arg
));
  }
  public String toString()
  { return ("<#
#>"); }

}
typeinfo
java/lang/Object
()V
append
,(Ljava/lang/String;)Ljava/lang/StringBuffer;
,(Ljava/lang/Object;)Ljava/lang/StringBuffer;
toString
()Ljava/lang/String;
java/io/PrintStream
println
(Ljava/lang/String;)V
(I)Ljava/lang/StringBuffer;
java/lang/String
equals
(Ljava/lang/Object;)Z
print =>?@A@BCDE
F<*?
*+?*,?*-??
G
	HI
F?J+?Y???	Y?
???
+?Y??*?????
+?
+?
+?
+?
>?a+?Y??*???*??????
+?
*?2??=?U*?2??*?2??*?2??=?&*?2??*?2??=?=?

h

h+?Y? ?*??!?`?"???
+?Y?#??$???
?
^+?Y?%?*??&?`?"???
?>+?Y?'?*?2?(??)?*?2?*???
??+?Y?'?*?2?(??)?*?2?+???
??+?Y?,?*??-?*?2?.?`?"???
+?Y?/?*?2?0?*??-?*?2?.?`?"???
+?Y?'?*?2?(??1?*?2?2???
?
*?????+?Y?3?*??4???5*???	+6?56?+?Y?7????5?
*?????+8?
+9?
+?Y?:?*??;???
+