| // -*- c -*- c mode in emacs |
| |
| // Copyright (C) 2001, 2002 Free Software Foundation, Inc. |
| // This program is free software; you can redistribute it and/or modify it |
| // under the terms of the GNU General Public License as published by the |
| // Free Software Foundation; either version 2, or (at your option) any |
| // later version. |
| // |
| // This program is distributed in the hope that it will be useful, |
| // but WITHOUT ANY WARRANTY; without even the implied warranty of |
| // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| // GNU General Public License for more details. |
| // |
| // You should have received a copy of the GNU General Public License |
| // along with this program; if not, write to the Free Software |
| // Foundation, 51 Franklin Street, Fifth Floor, |
| // Boston, MA 02110-1301, USA. |
| // |
| // In other words, you are welcome to use, share and improve this program. |
| // You are forbidden to forbid anyone else to use, share and improve |
| // what you give them. Help stamp out software-hoarding! |
| |
| |
| external_definition int add(int arg1, int arg2); |
| external_definition int subtract(int arg3, int arg4); |
| external_definition int first_nonzero(int arg5, int arg6); |
| external_definition int double_plus_one(int arg7); |
| |
| add |
| { |
| return arg1 + arg2; |
| } |
| |
| |
| subtract |
| { |
| return arg3 - arg4; |
| } |
| |
| double_plus_one |
| { |
| automatic int aaa; |
| aaa=add(arg7, arg7); |
| aaa=add(aaa, aaa); |
| aaa=subtract(subtract(aaa, arg7), arg7) + 1; |
| return aaa; |
| } |
| |
| first_nonzero |
| { |
| if (arg5) |
| { |
| return arg5; |
| } |
| else |
| { |
| } |
| return arg6; |
| } |
| |