2020-05-24 04:43:00 +02:00
|
|
|
// Copyright (c) 2019-2020 Alexander Medvednikov. All rights reserved.
|
|
|
|
// Use of this source code is governed by an MIT license
|
|
|
|
// that can be found in the LICENSE file.
|
|
|
|
module checker
|
|
|
|
|
|
|
|
import v.table
|
2020-05-31 12:58:13 +02:00
|
|
|
import v.token
|
2020-06-16 10:41:51 +02:00
|
|
|
import v.ast
|
2020-05-24 04:43:00 +02:00
|
|
|
|
2020-07-23 23:16:36 +02:00
|
|
|
pub fn (mut c Checker) check_basic(got, expected table.Type) bool {
|
2020-07-04 19:58:10 +02:00
|
|
|
if got == expected {
|
|
|
|
return true
|
|
|
|
}
|
2020-05-24 04:43:00 +02:00
|
|
|
t := c.table
|
2020-05-27 05:42:48 +02:00
|
|
|
got_idx := t.unalias_num_type(got).idx()
|
|
|
|
exp_idx := t.unalias_num_type(expected).idx()
|
2020-05-24 04:43:00 +02:00
|
|
|
// got_is_ptr := got.is_ptr()
|
|
|
|
exp_is_ptr := expected.is_ptr()
|
|
|
|
// println('check: $got_type_sym.name, $exp_type_sym.name')
|
|
|
|
// # NOTE: use idxs here, and symbols below for perf
|
|
|
|
if got_idx == exp_idx {
|
|
|
|
// this is returning true even if one type is a ptr
|
|
|
|
// and the other is not, is this correct behaviour?
|
|
|
|
return true
|
|
|
|
}
|
2020-06-04 14:38:54 +02:00
|
|
|
if got_idx == table.none_type_idx && expected.has_flag(.optional) {
|
2020-05-24 04:43:00 +02:00
|
|
|
return true
|
|
|
|
}
|
|
|
|
// allow pointers to be initialized with 0. TODO: use none instead
|
|
|
|
if exp_is_ptr && got_idx == table.int_type_idx {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
if exp_idx == table.voidptr_type_idx || got_idx == table.voidptr_type_idx {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
if exp_idx == table.any_type_idx || got_idx == table.any_type_idx {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
// TODO i64 as int etc
|
2020-06-24 22:12:33 +02:00
|
|
|
if (exp_idx in table.pointer_type_idxs ||
|
|
|
|
exp_idx in table.number_type_idxs) &&
|
|
|
|
(got_idx in table.pointer_type_idxs || got_idx in table.number_type_idxs) {
|
2020-05-24 04:43:00 +02:00
|
|
|
return true
|
|
|
|
}
|
|
|
|
// if exp_idx in pointer_type_idxs && got_idx in pointer_type_idxs {
|
|
|
|
// return true
|
|
|
|
// }
|
|
|
|
// see hack in checker IndexExpr line #691
|
2020-06-24 22:12:33 +02:00
|
|
|
if (got_idx == table.byte_type_idx &&
|
|
|
|
exp_idx == table.byteptr_type_idx) ||
|
|
|
|
(exp_idx == table.byte_type_idx && got_idx == table.byteptr_type_idx) {
|
2020-05-24 04:43:00 +02:00
|
|
|
return true
|
|
|
|
}
|
2020-06-24 22:12:33 +02:00
|
|
|
if (got_idx == table.char_type_idx &&
|
|
|
|
exp_idx == table.charptr_type_idx) ||
|
|
|
|
(exp_idx == table.char_type_idx && got_idx == table.charptr_type_idx) {
|
2020-05-24 04:43:00 +02:00
|
|
|
return true
|
|
|
|
}
|
2020-06-29 20:09:09 +02:00
|
|
|
// TODO: this should no longer be needed
|
|
|
|
// if expected == table.t_type && got == table.t_type {
|
2020-08-11 00:51:15 +02:00
|
|
|
// return true
|
2020-06-29 20:09:09 +02:00
|
|
|
// }
|
2020-05-24 04:43:00 +02:00
|
|
|
// # NOTE: use symbols from this point on for perf
|
|
|
|
got_type_sym := t.get_type_symbol(got)
|
|
|
|
exp_type_sym := t.get_type_symbol(expected)
|
|
|
|
//
|
|
|
|
if exp_type_sym.kind == .function && got_type_sym.kind == .int {
|
|
|
|
// TODO temporary
|
|
|
|
// fn == 0
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
// allow enum value to be used as int
|
2020-06-24 22:12:33 +02:00
|
|
|
if (got_type_sym.is_int() && exp_type_sym.kind == .enum_) ||
|
|
|
|
(exp_type_sym.is_int() && got_type_sym.kind == .enum_) {
|
2020-05-24 04:43:00 +02:00
|
|
|
return true
|
|
|
|
}
|
|
|
|
// TODO
|
|
|
|
// if got_type_sym.kind == .array && exp_type_sym.kind == .array {
|
|
|
|
// return true
|
|
|
|
// }
|
|
|
|
if got_type_sym.kind == .array_fixed && exp_type_sym.kind == .byteptr {
|
|
|
|
info := got_type_sym.info as table.ArrayFixed
|
|
|
|
if info.elem_type.idx() == table.byte_type_idx {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
}
|
|
|
|
// TODO
|
|
|
|
if exp_type_sym.name == 'array' || got_type_sym.name == 'array' {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
// TODO
|
|
|
|
// accept [] when an expected type is an array
|
2020-06-24 22:12:33 +02:00
|
|
|
if got_type_sym.kind == .array &&
|
2020-08-11 00:51:15 +02:00
|
|
|
got_type_sym.name == 'array_void' && exp_type_sym.kind == .array {
|
2020-05-24 04:43:00 +02:00
|
|
|
return true
|
|
|
|
}
|
|
|
|
// type alias
|
2020-06-24 22:12:33 +02:00
|
|
|
if (got_type_sym.kind == .alias &&
|
|
|
|
got_type_sym.parent_idx == exp_idx) ||
|
|
|
|
(exp_type_sym.kind == .alias && exp_type_sym.parent_idx == got_idx) {
|
2020-05-24 04:43:00 +02:00
|
|
|
return true
|
|
|
|
}
|
|
|
|
// sum type
|
2020-07-05 16:53:56 +02:00
|
|
|
if c.check_sumtype_compatibility(got, expected) {
|
2020-07-05 16:25:04 +02:00
|
|
|
return true
|
2020-05-24 04:43:00 +02:00
|
|
|
}
|
|
|
|
// fn type
|
|
|
|
if got_type_sym.kind == .function && exp_type_sym.kind == .function {
|
2020-07-04 19:58:10 +02:00
|
|
|
return c.check_matching_function_symbols(got_type_sym, exp_type_sym)
|
|
|
|
}
|
|
|
|
return false
|
|
|
|
}
|
|
|
|
|
2020-08-11 00:51:15 +02:00
|
|
|
pub fn (mut c Checker) check_matching_function_symbols(got_type_sym, exp_type_sym &table.TypeSymbol) bool {
|
2020-07-04 19:58:10 +02:00
|
|
|
got_info := got_type_sym.info as table.FnType
|
|
|
|
exp_info := exp_type_sym.info as table.FnType
|
|
|
|
got_fn := got_info.func
|
|
|
|
exp_fn := exp_info.func
|
|
|
|
// we are using check() to compare return type & args as they might include
|
|
|
|
// functions themselves. TODO: optimize, only use check() when needed
|
|
|
|
if got_fn.args.len != exp_fn.args.len {
|
|
|
|
return false
|
|
|
|
}
|
|
|
|
if !c.check_basic(got_fn.return_type, exp_fn.return_type) {
|
|
|
|
return false
|
|
|
|
}
|
|
|
|
for i, got_arg in got_fn.args {
|
|
|
|
exp_arg := exp_fn.args[i]
|
|
|
|
exp_arg_is_ptr := exp_arg.typ.is_ptr() || exp_arg.typ.is_pointer()
|
|
|
|
got_arg_is_ptr := got_arg.typ.is_ptr() || got_arg.typ.is_pointer()
|
|
|
|
if exp_arg_is_ptr != got_arg_is_ptr {
|
2020-07-04 21:24:44 +02:00
|
|
|
exp_arg_pointedness := if exp_arg_is_ptr { 'a pointer' } else { 'NOT a pointer' }
|
|
|
|
got_arg_pointedness := if got_arg_is_ptr { 'a pointer' } else { 'NOT a pointer' }
|
2020-08-11 00:51:15 +02:00
|
|
|
c.add_error_detail("`$exp_fn.name`\'s expected fn argument: `$exp_arg.name` is $exp_arg_pointedness, but the passed fn argument: `$got_arg.name` is $got_arg_pointedness")
|
2020-07-04 19:58:10 +02:00
|
|
|
return false
|
|
|
|
}
|
|
|
|
if !c.check_basic(got_arg.typ, exp_arg.typ) {
|
|
|
|
return false
|
2020-05-24 04:43:00 +02:00
|
|
|
}
|
|
|
|
}
|
2020-07-04 19:58:10 +02:00
|
|
|
return true
|
2020-05-24 04:43:00 +02:00
|
|
|
}
|
2020-05-27 05:42:48 +02:00
|
|
|
|
2020-05-31 12:58:13 +02:00
|
|
|
[inline]
|
2020-07-23 23:16:36 +02:00
|
|
|
fn (mut c Checker) check_shift(left_type, right_type table.Type, left_pos, right_pos token.Position) table.Type {
|
2020-05-31 12:58:13 +02:00
|
|
|
if !left_type.is_int() {
|
2020-08-11 01:05:34 +02:00
|
|
|
// maybe it's an int alias? TODO move this to is_int() ?
|
|
|
|
sym := c.table.get_type_symbol(left_type)
|
|
|
|
if sym.kind == .alias && (sym.info as table.Alias).parent_type.is_int() {
|
|
|
|
return left_type
|
|
|
|
}
|
2020-08-11 16:26:49 +02:00
|
|
|
if c.pref.translated && left_type == table.bool_type {
|
|
|
|
// allow `bool << 2` in translated C code
|
|
|
|
return table.int_type
|
|
|
|
}
|
2020-08-11 01:05:34 +02:00
|
|
|
c.error('invalid operation: shift of type `$sym.name`', left_pos)
|
2020-05-31 12:58:13 +02:00
|
|
|
return table.void_type
|
|
|
|
} else if !right_type.is_int() {
|
2020-06-19 11:15:15 +02:00
|
|
|
c.error('cannot shift non-integer type ${c.table.get_type_symbol(right_type).name} into type ${c.table.get_type_symbol(left_type).name}',
|
|
|
|
right_pos)
|
2020-05-31 12:58:13 +02:00
|
|
|
return table.void_type
|
|
|
|
}
|
|
|
|
return left_type
|
|
|
|
}
|
|
|
|
|
2020-05-27 05:42:48 +02:00
|
|
|
pub fn (c &Checker) promote(left_type, right_type table.Type) table.Type {
|
|
|
|
if left_type.is_ptr() || left_type.is_pointer() {
|
|
|
|
if right_type.is_int() {
|
|
|
|
return left_type
|
|
|
|
} else {
|
|
|
|
return table.void_type
|
|
|
|
}
|
|
|
|
} else if right_type.is_ptr() || right_type.is_pointer() {
|
|
|
|
if left_type.is_int() {
|
|
|
|
return right_type
|
|
|
|
} else {
|
|
|
|
return table.void_type
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if left_type == right_type {
|
|
|
|
return left_type // strings, self defined operators
|
|
|
|
}
|
|
|
|
if right_type.is_number() && left_type.is_number() {
|
2020-06-01 21:15:59 +02:00
|
|
|
return c.promote_num(left_type, right_type)
|
2020-09-18 01:03:55 +02:00
|
|
|
} else if left_type.has_flag(.optional) != right_type.has_flag(.optional) {
|
|
|
|
// incompatible
|
|
|
|
return table.void_type
|
2020-06-01 21:15:59 +02:00
|
|
|
} else {
|
|
|
|
return left_type // default to left if not automatic promotion possible
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
fn (c &Checker) promote_num(left_type, right_type table.Type) table.Type {
|
|
|
|
// sort the operands to save time
|
|
|
|
mut type_hi := left_type
|
|
|
|
mut type_lo := right_type
|
|
|
|
if type_hi.idx() < type_lo.idx() {
|
|
|
|
type_hi, type_lo = type_lo, type_hi
|
|
|
|
}
|
|
|
|
idx_hi := type_hi.idx()
|
|
|
|
idx_lo := type_lo.idx()
|
|
|
|
// the following comparisons rely on the order of the indices in atypes.v
|
|
|
|
if idx_hi == table.any_int_type_idx {
|
|
|
|
return type_lo
|
|
|
|
} else if idx_hi == table.any_flt_type_idx {
|
|
|
|
if idx_lo in table.float_type_idxs {
|
2020-05-27 05:42:48 +02:00
|
|
|
return type_lo
|
2020-06-01 21:15:59 +02:00
|
|
|
} else {
|
|
|
|
return table.void_type
|
|
|
|
}
|
|
|
|
} else if type_hi.is_float() {
|
|
|
|
if idx_hi == table.f32_type_idx {
|
|
|
|
if idx_lo in [table.i64_type_idx, table.u64_type_idx] {
|
|
|
|
return table.void_type
|
|
|
|
} else {
|
|
|
|
return type_hi
|
2020-05-27 05:42:48 +02:00
|
|
|
}
|
2020-06-02 17:00:14 +02:00
|
|
|
} else { // f64, any_flt
|
|
|
|
return type_hi
|
2020-05-27 05:42:48 +02:00
|
|
|
}
|
2020-06-01 21:15:59 +02:00
|
|
|
} else if idx_lo >= table.byte_type_idx { // both operands are unsigned
|
|
|
|
return type_hi
|
2020-09-18 01:01:05 +02:00
|
|
|
} else if idx_lo >= table.i8_type_idx &&
|
|
|
|
(idx_hi <= table.i64_type_idx || idx_hi == table.rune_type_idx) { // both signed
|
|
|
|
return if idx_lo == table.i64_type_idx {
|
|
|
|
type_lo
|
|
|
|
} else {
|
|
|
|
type_hi
|
|
|
|
}
|
2020-06-01 21:15:59 +02:00
|
|
|
} else if idx_hi - idx_lo < (table.byte_type_idx - table.i8_type_idx) {
|
|
|
|
return type_lo // conversion unsigned -> signed if signed type is larger
|
2020-05-27 05:42:48 +02:00
|
|
|
} else {
|
2020-06-01 21:15:59 +02:00
|
|
|
return table.void_type // conversion signed -> unsigned not allowed
|
2020-05-27 05:42:48 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2020-06-01 21:15:59 +02:00
|
|
|
// TODO: promote(), check_types(), symmetric_check() and check() overlap - should be rearranged
|
2020-07-23 23:16:36 +02:00
|
|
|
pub fn (mut c Checker) check_types(got, expected table.Type) bool {
|
2020-07-04 19:58:10 +02:00
|
|
|
if got == expected {
|
|
|
|
return true
|
|
|
|
}
|
2020-05-27 05:42:48 +02:00
|
|
|
exp_idx := expected.idx()
|
|
|
|
got_idx := got.idx()
|
|
|
|
if exp_idx == got_idx {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
if exp_idx == table.voidptr_type_idx || exp_idx == table.byteptr_type_idx {
|
|
|
|
if got.is_ptr() || got.is_pointer() {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
}
|
|
|
|
// allow direct int-literal assignment for pointers for now
|
|
|
|
// maybe in the future optionals should be used for that
|
|
|
|
if expected.is_ptr() || expected.is_pointer() {
|
|
|
|
if got == table.any_int_type {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if got_idx == table.voidptr_type_idx || got_idx == table.byteptr_type_idx {
|
|
|
|
if expected.is_ptr() || expected.is_pointer() {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
}
|
2020-06-01 21:15:59 +02:00
|
|
|
if !c.check_basic(got, expected) { // TODO: this should go away...
|
2020-05-27 05:42:48 +02:00
|
|
|
return false
|
|
|
|
}
|
2020-06-01 21:15:59 +02:00
|
|
|
if got.is_number() && expected.is_number() {
|
2020-08-27 06:46:18 +02:00
|
|
|
if got == table.rune_type && expected == table.byte_type {
|
|
|
|
return true
|
|
|
|
} else if expected == table.rune_type && got == table.byte_type {
|
|
|
|
return true
|
|
|
|
}
|
2020-06-01 21:15:59 +02:00
|
|
|
if c.promote_num(expected, got) != expected {
|
|
|
|
// println('could not promote ${c.table.get_type_symbol(got).name} to ${c.table.get_type_symbol(expected).name}')
|
|
|
|
return false
|
|
|
|
}
|
2020-05-27 05:42:48 +02:00
|
|
|
}
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
|
2020-07-23 23:16:36 +02:00
|
|
|
pub fn (mut c Checker) symmetric_check(left, right table.Type) bool {
|
2020-05-27 05:42:48 +02:00
|
|
|
// allow direct int-literal assignment for pointers for now
|
|
|
|
// maybe in the future optionals should be used for that
|
|
|
|
if right.is_ptr() || right.is_pointer() {
|
|
|
|
if left == table.any_int_type {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
}
|
|
|
|
// allow direct int-literal assignment for pointers for now
|
|
|
|
if left.is_ptr() || left.is_pointer() {
|
|
|
|
if right == table.any_int_type {
|
|
|
|
return true
|
|
|
|
}
|
|
|
|
}
|
2020-06-01 21:15:59 +02:00
|
|
|
return c.check_basic(left, right)
|
2020-05-27 05:42:48 +02:00
|
|
|
}
|
2020-06-16 10:41:51 +02:00
|
|
|
|
|
|
|
pub fn (c &Checker) get_default_fmt(ftyp, typ table.Type) byte {
|
|
|
|
if typ.is_float() {
|
|
|
|
return `g`
|
|
|
|
} else if typ.is_signed() || typ.is_any_int() {
|
|
|
|
return `d`
|
|
|
|
} else if typ.is_unsigned() {
|
|
|
|
return `u`
|
|
|
|
} else if typ.is_pointer() {
|
|
|
|
return `p`
|
|
|
|
} else {
|
2020-09-20 19:51:14 +02:00
|
|
|
mut sym := c.table.get_type_symbol(ftyp)
|
2020-06-24 22:12:33 +02:00
|
|
|
if sym.kind == .alias {
|
|
|
|
// string aliases should be printable
|
|
|
|
info := sym.info as table.Alias
|
2020-09-20 19:51:14 +02:00
|
|
|
sym = c.table.get_type_symbol(info.parent_type)
|
2020-06-24 22:12:33 +02:00
|
|
|
if info.parent_type == table.string_type {
|
|
|
|
return `s`
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if ftyp in [table.string_type, table.bool_type] ||
|
2020-09-23 20:51:51 +02:00
|
|
|
sym.kind in [.enum_, .array, .array_fixed, .struct_, .map, .multi_return, .sum_type] || ftyp.has_flag(.optional) ||
|
2020-06-24 22:12:33 +02:00
|
|
|
sym.has_method('str') {
|
2020-06-16 10:41:51 +02:00
|
|
|
return `s`
|
|
|
|
} else {
|
|
|
|
return `_`
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2020-07-23 23:16:36 +02:00
|
|
|
pub fn (mut c Checker) string_inter_lit(mut node ast.StringInterLiteral) table.Type {
|
2020-06-16 10:41:51 +02:00
|
|
|
for i, expr in node.exprs {
|
|
|
|
ftyp := c.expr(expr)
|
|
|
|
node.expr_types << ftyp
|
|
|
|
typ := c.table.unalias_num_type(ftyp)
|
|
|
|
mut fmt := node.fmts[i]
|
|
|
|
// analyze and validate format specifier
|
2020-08-11 00:51:15 +02:00
|
|
|
if fmt !in
|
|
|
|
[`E`, `F`, `G`, `e`, `f`, `g`, `d`, `u`, `x`, `X`, `o`, `c`, `s`, `p`, `_`] {
|
2020-06-16 10:41:51 +02:00
|
|
|
c.error('unknown format specifier `${fmt:c}`', node.fmt_poss[i])
|
|
|
|
}
|
|
|
|
if fmt == `_` { // set default representation for type if none has been given
|
|
|
|
fmt = c.get_default_fmt(ftyp, typ)
|
|
|
|
if fmt == `_` {
|
2020-06-19 11:15:15 +02:00
|
|
|
if typ != table.void_type {
|
|
|
|
c.error('no known default format for type `${c.table.get_type_name(ftyp)}`',
|
2020-06-16 10:41:51 +02:00
|
|
|
node.fmt_poss[i])
|
2020-06-19 11:15:15 +02:00
|
|
|
}
|
2020-06-16 10:41:51 +02:00
|
|
|
} else {
|
|
|
|
node.fmts[i] = fmt
|
|
|
|
node.need_fmts[i] = false
|
|
|
|
}
|
|
|
|
} else { // check if given format specifier is valid for type
|
|
|
|
if node.precisions[i] != 0 && !typ.is_float() {
|
|
|
|
c.error('precision specification only valid for float types', node.fmt_poss[i])
|
|
|
|
}
|
|
|
|
if node.pluss[i] && !typ.is_number() {
|
2020-06-26 07:05:07 +02:00
|
|
|
c.error('plus prefix only allowed for numbers', node.fmt_poss[i])
|
2020-06-16 10:41:51 +02:00
|
|
|
}
|
2020-06-24 22:12:33 +02:00
|
|
|
if (typ.is_unsigned() && fmt !in [`u`, `x`, `X`, `o`, `c`]) ||
|
|
|
|
(typ.is_signed() && fmt !in [`d`, `x`, `X`, `o`, `c`]) ||
|
|
|
|
(typ.is_any_int() && fmt !in [`d`, `c`, `x`, `X`, `o`, `u`, `x`, `X`, `o`]) ||
|
|
|
|
(typ.is_float() && fmt !in [`E`, `F`, `G`, `e`, `f`, `g`]) ||
|
|
|
|
(typ.is_pointer() && fmt !in [`p`, `x`, `X`]) ||
|
|
|
|
(typ.is_string() && fmt != `s`) ||
|
|
|
|
(typ.idx() in [table.i64_type_idx, table.f64_type_idx] && fmt == `c`) {
|
2020-06-16 10:41:51 +02:00
|
|
|
c.error('illegal format specifier `${fmt:c}` for type `${c.table.get_type_name(ftyp)}`',
|
|
|
|
node.fmt_poss[i])
|
|
|
|
}
|
|
|
|
node.need_fmts[i] = fmt != c.get_default_fmt(ftyp, typ)
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return table.string_type
|
|
|
|
}
|
2020-07-05 16:53:56 +02:00
|
|
|
|
2020-08-11 00:51:15 +02:00
|
|
|
pub fn (c &Checker) check_sumtype_compatibility(a, b table.Type) bool {
|
2020-09-18 01:01:05 +02:00
|
|
|
return c.table.sumtype_has_variant(a, b) || c.table.sumtype_has_variant(b, a)
|
2020-07-05 16:53:56 +02:00
|
|
|
}
|