change type to class name
although int is still allowed for integers (gets replaced though)
This commit is contained in:
@ -1,6 +1,6 @@
|
||||
class String
|
||||
|
||||
ref self.new_string(int len )
|
||||
String self.new_string(int len )
|
||||
len = len << 2
|
||||
return super.new_object( len)
|
||||
end
|
||||
@ -9,7 +9,7 @@ class String
|
||||
return self.length
|
||||
end
|
||||
|
||||
int plus(ref str)
|
||||
int plus(String str)
|
||||
my_length = self.length
|
||||
str_len = str.length()
|
||||
my_length = str_len + my_length
|
||||
@ -36,10 +36,10 @@ s(:statements,
|
||||
s(:class, :String,
|
||||
s(:derives, nil),
|
||||
s(:statements,
|
||||
s(:function, :ref,
|
||||
s(:function, :String,
|
||||
s(:name, :new_string),
|
||||
s(:parameters,
|
||||
s(:parameter, :int, :len)),
|
||||
s(:parameter, :Integer, :len)),
|
||||
s(:statements,
|
||||
s(:assignment,
|
||||
s(:name, :len),
|
||||
@ -54,7 +54,7 @@ s(:statements,
|
||||
s(:receiver,
|
||||
s(:name, :super))))),
|
||||
s(:receiver, :self)),
|
||||
s(:function, :int,
|
||||
s(:function, :Integer,
|
||||
s(:name, :length),
|
||||
s(:parameters),
|
||||
s(:statements,
|
||||
@ -64,10 +64,10 @@ s(:statements,
|
||||
s(:name, :self)),
|
||||
s(:field,
|
||||
s(:name, :length)))))),
|
||||
s(:function, :int,
|
||||
s(:function, :Integer,
|
||||
s(:name, :plus),
|
||||
s(:parameters,
|
||||
s(:parameter, :ref, :str)),
|
||||
s(:parameter, :String, :str)),
|
||||
s(:statements,
|
||||
s(:assignment,
|
||||
s(:name, :my_length),
|
||||
|
@ -9,9 +9,9 @@ s(:statements,
|
||||
s(:class, :Foo,
|
||||
s(:derives, :Object),
|
||||
s(:statements,
|
||||
s(:class_field, :int, :fff,
|
||||
s(:class_field, :Integer, :fff,
|
||||
s(:int, 3)),
|
||||
s(:function, :int,
|
||||
s(:function, :Integer,
|
||||
s(:name, :func),
|
||||
s(:parameters),
|
||||
s(:statements,
|
||||
|
@ -1,6 +1,6 @@
|
||||
class Pifi
|
||||
|
||||
int self.ofthen(int n , ref m)
|
||||
int self.ofthen(int n , Object m)
|
||||
n = n + m.index
|
||||
return n
|
||||
end
|
||||
@ -10,11 +10,11 @@ s(:statements,
|
||||
s(:class, :Pifi,
|
||||
s(:derives, nil),
|
||||
s(:statements,
|
||||
s(:function, :int,
|
||||
s(:function, :Integer,
|
||||
s(:name, :ofthen),
|
||||
s(:parameters,
|
||||
s(:parameter, :int, :n),
|
||||
s(:parameter, :ref, :m)),
|
||||
s(:parameter, :Integer, :n),
|
||||
s(:parameter, :Object, :m)),
|
||||
s(:statements,
|
||||
s(:assignment,
|
||||
s(:name, :n),
|
||||
|
@ -12,10 +12,10 @@ s(:statements,
|
||||
s(:class, :Ifi,
|
||||
s(:derives, nil),
|
||||
s(:statements,
|
||||
s(:function, :int,
|
||||
s(:function, :Integer,
|
||||
s(:name, :ofthen),
|
||||
s(:parameters,
|
||||
s(:parameter, :int, :n)),
|
||||
s(:parameter, :Integer, :n)),
|
||||
s(:statements,
|
||||
s(:if_statement,
|
||||
s(:condition,
|
||||
|
@ -8,7 +8,7 @@ s(:statements,
|
||||
s(:class, :Foo,
|
||||
s(:derives, :Object),
|
||||
s(:statements,
|
||||
s(:function, :int,
|
||||
s(:function, :Integer,
|
||||
s(:name, :test),
|
||||
s(:parameters),
|
||||
s(:statements,
|
||||
|
@ -9,12 +9,12 @@ s(:statements,
|
||||
s(:class, :Opers,
|
||||
s(:derives, nil),
|
||||
s(:statements,
|
||||
s(:function, :int,
|
||||
s(:function, :Integer,
|
||||
s(:name, :foo),
|
||||
s(:parameters,
|
||||
s(:parameter, :int, :x)),
|
||||
s(:parameter, :Integer, :x)),
|
||||
s(:statements,
|
||||
s(:field_def, :int, :abba,
|
||||
s(:field_def, :Integer, :abba,
|
||||
s(:int, 5)),
|
||||
s(:return,
|
||||
s(:operator_value, :+,
|
||||
|
@ -6,4 +6,4 @@ s(:statements,
|
||||
s(:class, :Foo,
|
||||
s(:derives, nil),
|
||||
s(:statements,
|
||||
s(:class_field, :int, :x))))
|
||||
s(:class_field, :Integer, :x))))
|
||||
|
Reference in New Issue
Block a user