artemist/mes
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

mescc: Support Nyacc-0.81.0.

Browse source 
* module/language/c99/compiler.mes (ast->info): Handle asm-expr from
  Nyacc 0.81.0.
This commit is contained in:
Jan Nieuwenhuizen 2017-09-10 21:09:23 +02:00
parent 7e6408534f
commit 66204d56c0
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
module/language/c99/compiler.mes
View file

@ -2631,6 +2631,9 @@
((compd-stmt (block-item-list . ,statements)) ((ast-list->info info) statements)) ((compd-stmt (block-item-list . ,statements)) ((ast-list->info info) statements))
((asm-expr ,gnuc (,null ,arg0 . string))
(append-text info (wrap-as (asm->m1 arg0))))
((expr-stmt (fctn-call (p-expr (ident ,name)) (expr-list . ,expr-list))) ((expr-stmt (fctn-call (p-expr (ident ,name)) (expr-list . ,expr-list)))
(if (equal? name "asm") (let ((arg0 (cadr (cadar expr-list)))) (if (equal? name "asm") (let ((arg0 (cadr (cadar expr-list))))
(append-text info (wrap-as (asm->m1 arg0)))) (append-text info (wrap-as (asm->m1 arg0))))