Context Navigation

chip_kernel.trb@ 270

Last change on this file since 270 was 270, checked in by coas-nagasima, 7 years ago
mruby版ECNLプロトタイピング・ツールを追加
Property svn:eol-style set to `native` Property svn:mime-type set to `text/x-ruby`
File size: 1.1 KB

Line
1	# -- coding: utf-8 --
2	#
3	# ãã¹2ã®çæã¹ã¯ãªããã®ãããä¾åé¨ï¼RZ/A1ç¨ï¼
4	#
5
6	#
7	# ä½¿ç¨ã§ããå²è¾¼ã¿çªå·ã¨ããã«å¯¾å¿ããå²è¾¼ã¿ãã³ãã©çªå·
8	#
9	if $TOPPERS_RZA1H
10	$INTNO_VALID = [ *(0..586) ]
11	else
12	$INTNO_VALID = [ *(0..537) ]
13	end
14	$INHNO_VALID = $INTNO_VALID
15
16	#
17	# ã¿ã¼ã²ããå®ç¾©ã®å²è¾¼ã¿è¦æ±ã©ã¤ã³å±æ§
18	#
19	$TARGET_INTATR = $TA_NEGEDGE\|$TA_POSEDGE\|$TA_BOTHEDGE
20
21	#
22	# çæã¹ã¯ãªããã®ã³ã¢ä¾åé¨
23	#
24	IncludeTrb("core_kernel.trb")
25
26	#
27	# å²è¾¼ã¿è¦æ±ã©ã¤ã³å±æ§ã«é¢ããã¿ã¼ã²ããä¾åã®ã¨ã©ã¼ãã§ãã¯
28	#
29	$cfgData[:CFG_INT].each do \|key, params\|
30	if $INTNO_IRQ0 <= key && key <= $INTNO_IRQ7
31	# IRQå²è¾¼ã¿ã®å ´å
32	#ï¼TA_EDGEãã»ããããã¦ããå ´åï¼
33	if (params[:intatr] & $TA_EDGE) != 0
34	error_illegal_sym("E_RSATR", params, :intatr, :intno)
35	end
36	else
37	# ãã®ä»ã®å²è¾¼ã¿ã®å ´å
38	#ï¼TA_NEGEDGEï¼TA_POSEDGEï¼TARGET_BOTHEDGEãã»ããããã¦ããå ´åï¼
39	if (params[:intatr] & $TARGET_INTATR) != 0
40	error_illegal_sym("E_RSATR", params, :intatr, :intno)
41	end
42	end
43	end

Note: See TracBrowser for help on using the repository browser.