vala/valamethodtype.vala

   1 /* valamethodtype.vala
   2  *
   3  * Copyright (C) 2007-2008  Jürg Billeter
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301  USA
  18  *
  19  * Author:
  20  *      Jürg Billeter <j@bitron.ch>
  21  */
  22
  23 using GLib;
  24 using Gee;
  25
  26 /**
  27  * The type of a method referencea.
  28  */
  29 public class Vala.MethodType : DataType {
  30         public Method method_symbol { get; set; }
  31
  32         public MethodType (Method method_symbol) {
  33                 this.method_symbol = method_symbol;
  34         }
  35
  36         public override bool is_invokable () {
  37                 return true;
  38         }
  39
  40         public override DataType? get_return_type () {
  41                 return method_symbol.return_type;
  42         }
  43
  44         public override Gee.List<FormalParameter>? get_parameters () {
  45                 return method_symbol.get_parameters ();
  46         }
  47
  48         public override DataType copy () {
  49                 return new MethodType (method_symbol);
  50         }
  51
  52         public override bool compatible (DataType target_type) {
  53                 var dt = target_type as DelegateType;
  54                 if (dt == null) {
  55                         // method types incompatible to anything but delegates
  56                         return false;
  57                 }
  58
  59                 return dt.delegate_symbol.matches_method (method_symbol);
  60         }
  61
  62         public override string to_qualified_string (Scope? scope) {
  63                 return method_symbol.get_full_name ();
  64         }
  65
  66         public override string? get_cname () {
  67                 return "gpointer";
  68         }
  69
  70         public override Symbol? get_member (string member_name) {
  71                 if (method_symbol.coroutine && member_name == "begin") {
  72                         return method_symbol;
  73                 }
  74                 return null;
  75         }
  76 }