Simple Preprocessor

Submit

Language is selected by the extension of the file. See the list of supported languages to know the extension of your language.

Problem

Preprocess all input lines using the following steps:

1. Trim all tabs and spaces from the beginning and end of the line
2. If the line is not empty and doesn't start with #, output the line.

Options

exec is denied

now post-mortem time, all source codes will be revealed

Sample input:_

#=======================================
#Preprocessor test file and preprocessor
#=======================================

#Define application attributes
*application 'preprocessor' has entry 'start' and has exit 'finish'
*functionality 'console'
*add module 'core'
*add module 'streams'
*add module 'strings'
	
#Define entry point
fixed function->start [no arguments, no value]   
	#Open standard input and output
	stream->stdin = getstd(0) 
	stream->stdout = getstd(1)
	#Loop until EOF
	fixed loop [exit on stdin@readline(empty) as string->line is null]	
	  	#Open an edit block to perform operations only on line	 	
		fixed edit line
			 #Remove all leading and trailing tabs and spaces 
			fixed loop [exit on @characters(0) as character->check is not in {' ','	'}, exit on @length@value as integer->size is not 0]
				@start@modify(@start@value + 1)
			complete
   	 	  	fixed loop [exit on @characters(@length@value - 1) as character->check is not in {' ','	'}, exit on @length@value as integer->size is not 0]  	
				@length@modify(@length@value - 1)	
			complete 				
		complete
		#Check if the line is not empty
        	fixed skip [execute on line@length@value as integer->temp is not 0]
			#Check if the line doesn't start with a hash symbol
			fixed skip [execute on line@characters(line@length@value - 1) as character->check is not '#']
				#Write the new line to the output
				stdout@writeline(line)
			complete
		complete
	complete
	#Close and finalize all streams
	stdin@close(empty)
        stdout@flush(empty)
	stdout@eof(empty)
	stdout@close(empty)
	#Clean all variables from memory
	destroy {stdin, stdout}
	#Exit the function	
	exit(empty)
complete
  	 
#Define exit point
fixed function->finish [no arguments, value is integer]
	#Return successful exit code
	exit(0)
complete

Sample output:

*application 'preprocessor' has entry 'start' and has exit 'finish'
*functionality 'console'
*add module 'core'
*add module 'streams'
*add module 'strings'
fixed function->start [no arguments, no value]
stream->stdin = getstd(0)
stream->stdout = getstd(1)
fixed loop [exit on stdin@readline(empty) as string->line is null]
fixed edit line
fixed loop [exit on @characters(0) as character->check is not in {' ','	'}, exit on @length@value as integer->size is not 0]
@start@modify(@start@value + 1)
complete
fixed loop [exit on @characters(@length@value - 1) as character->check is not in {' ','	'}, exit on @length@value as integer->size is not 0]
@length@modify(@length@value - 1)
complete
complete
fixed skip [execute on line@length@value as integer->temp is not 0]
fixed skip [execute on line@characters(line@length@value - 1) as character->check is not '#']
stdout@writeline(line)
complete
complete
complete
stdin@close(empty)
stdout@flush(empty)
stdout@eof(empty)
stdout@close(empty)
destroy {stdin, stdout}
exit(empty)
complete
fixed function->finish [no arguments, value is integer]
exit(0)
complete

Ranking

Ruby _

Perl _

Python _

PHP _

Scheme _

Io _

JavaScript _

Lua _

Tcl _

Kite _

SNOBOL _

Icon _

J _

K _

C _

Haskell _

C# _

REBOL _

AWK _

sed _

Bash _

wake _

xgawk _

Whitespace _

GolfScript _

FlogScript _

Vim _

Groovy _

Language Ranking_

return top