Tedd OKANO / Mbed 2 deprecated RPN_calc__based_on_K_and_R

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependencies:   mbed

getop.cpp@3:4ef74510cc5b, 2015-06-26 (annotated)

Committer:
okano
Date:
Fri Jun 26 11:01:35 2015 +0000
Revision:
3:4ef74510cc5b
Parent:
2:0e96f4495b43 
displaying stack by hitting [Enter] and operators

Who changed what in which revision?

UserRevisionLine numberNew contents of line
okano 2:0e96f4495b43 1 #include "mbed.h"
okano 2:0e96f4495b43 2 #include "calc.h"
okano 2:0e96f4495b43 3 #include <ctype.h>
okano 2:0e96f4495b43 4
okano 2:0e96f4495b43 5 int getop( char s[] )
okano 2:0e96f4495b43 6 {
okano 2:0e96f4495b43 7 int i, c;
okano 2:0e96f4495b43 8
okano 2:0e96f4495b43 9 while ( (s[ 0 ] = c = getch()) == ' ' || c == '\t' )
okano 2:0e96f4495b43 10 ;
okano 2:0e96f4495b43 11
okano 2:0e96f4495b43 12 s[ 1 ] = '\0';
okano 2:0e96f4495b43 13
okano 2:0e96f4495b43 14 if ( !isdigit( c ) && c != '.' )
okano 2:0e96f4495b43 15 return c;
okano 2:0e96f4495b43 16
okano 2:0e96f4495b43 17 i = 0;
okano 2:0e96f4495b43 18
okano 2:0e96f4495b43 19 if ( isdigit( c ) )
okano 2:0e96f4495b43 20 while ( isdigit( s[ ++i ] = c = getch() ) )
okano 2:0e96f4495b43 21 ;
okano 2:0e96f4495b43 22
okano 2:0e96f4495b43 23 if ( c == '.' )
okano 2:0e96f4495b43 24 while ( isdigit( s[ ++i ] = c = getch() ) )
okano 2:0e96f4495b43 25 ;
okano 2:0e96f4495b43 26
okano 2:0e96f4495b43 27 s[ i ] = '\0';
okano 2:0e96f4495b43 28
okano 2:0e96f4495b43 29
okano 2:0e96f4495b43 30 if ( c != EOF )
okano 2:0e96f4495b43 31 ungetch( c );
okano 2:0e96f4495b43 32
okano 2:0e96f4495b43 33 return NUMBER;
okano 2:0e96f4495b43 34 }