- Timestamp:
- Jul 3, 2020, 7:19:17 PM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
EcnlProtoTool/trunk/asp3_dcre/tecsgen/tecslib/core/ctypes.rb
r321 r429 4 4 # Generator for TOPPERS Embedded Component System 5 5 # 6 # Copyright (C) 2008-201 4by TOPPERS Project6 # Copyright (C) 2008-2017 by TOPPERS Project 7 7 #-- 8 8 # 上記著作権者は,以下の(1)~(4)の条件を満たす場合に限り,本ソフトウェ … … 118 118 end 119 119 return self 120 els e120 elsif self.instance_of?( CFloatType ) then 121 121 # mikan long double 122 122 # TECS には long double を表現する手段がない (double80_t を定義すればよいか?) 123 123 # cdl_warning( "C1003 $1 & $2 incompatible (\'long double\' is not supported.). Treated as $3." , self.class, another.class, self.class ) 124 cdl_warning( "W9999 $1 & $2 incompatible (\'long double\' is not supported.). Treated as $3." , self.get_type_str, another.get_type_str, self.get_type_str ) 125 return self 124 # cdl_warning( "W9999 $1 & $2 incompatible (\'long double\' is not supported.). Treated as $3." , self.get_type_str, another.get_type_str, self.get_type_str ) 125 self.to_long 126 return self 127 else 128 raise "merge: unknown type" 126 129 end 127 130 end … … 183 186 end 184 187 188 def to_long 189 if @bit_size != -64 then 190 cdl_warning( "W9999 long specified for $1" , get_type_str ) 191 else 192 @bit_size = -128 # @bit_size = -128 : long double 193 end 194 end 185 195 end 186 196
Note:
See TracChangeset
for help on using the changeset viewer.