Author: particle
Date: Wed Dec 28 10:20:09 2005
New Revision: 10736
Added:
trunk/examples/sdl/anim_image.pir
- copied, changed from r10724, trunk/examples/sdl/anim_image.imc
trunk/examples/sdl/anim_image_dblbuf.pir
- copied, changed from r10724, trunk/examples/sdl/anim_image_dblbuf.imc
trunk/examples/sdl/blue_font.pir
- copied, changed from r10724, trunk/examples/sdl/blue_font.imc
trunk/examples/sdl/blue_rect.pir
- copied, changed from r10724, trunk/examples/sdl/blue_rect.imc
trunk/examples/sdl/bounce_parrot_logo.pir
- copied, changed from r10724, trunk/examples/sdl/bounce_parrot_logo.imc
trunk/examples/sdl/lcd/clock.pir
- copied, changed from r10724, trunk/examples/sdl/lcd/clock.imc
trunk/examples/sdl/minesweeper/eventhandler.pir
- copied, changed from r10724,
trunk/examples/sdl/minesweeper/eventhandler.imc
trunk/examples/sdl/minesweeper/field.pir
- copied, changed from r10724, trunk/examples/sdl/minesweeper/field.imc
trunk/examples/sdl/minesweeper/mines.pir
- copied, changed from r10724, trunk/examples/sdl/minesweeper/mines.imc
trunk/examples/sdl/move_parrot_logo.pir
- copied, changed from r10724, trunk/examples/sdl/move_parrot_logo.imc
trunk/examples/sdl/raw_pixels.pir
- copied, changed from r10724, trunk/examples/sdl/raw_pixels.imc
trunk/examples/sdl/tetris/app.pir
- copied, changed from r10724, trunk/examples/sdl/tetris/app.imc
trunk/examples/sdl/tetris/block.pir
- copied, changed from r10724, trunk/examples/sdl/tetris/block.imc
trunk/examples/sdl/tetris/blockdata.pir
- copied, changed from r10724, trunk/examples/sdl/tetris/blockdata.imc
trunk/examples/sdl/tetris/blocks.pir
- copied, changed from r10724, trunk/examples/sdl/tetris/blocks.imc
trunk/examples/sdl/tetris/board.pir
- copied, changed from r10724, trunk/examples/sdl/tetris/board.imc
trunk/examples/sdl/tetris/boarddata.pir
- copied, changed from r10724, trunk/examples/sdl/tetris/boarddata.imc
trunk/examples/sdl/tetris/eventhandler.pir
- copied, changed from r10724, trunk/examples/sdl/tetris/eventhandler.imc
trunk/examples/sdl/tetris/tetris.pir
- copied, changed from r10724, trunk/examples/sdl/tetris/tetris.imc
trunk/runtime/parrot/library/SDL.pir
- copied unchanged from r10724, trunk/runtime/parrot/library/SDL.imc
trunk/runtime/parrot/library/SDL/App.pir
- copied, changed from r10724, trunk/runtime/parrot/library/SDL/App.imc
trunk/runtime/parrot/library/SDL/Button.pir
- copied unchanged from r10724,
trunk/runtime/parrot/library/SDL/Button.imc
trunk/runtime/parrot/library/SDL/Color.pir
- copied, changed from r10724, trunk/runtime/parrot/library/SDL/Color.imc
trunk/runtime/parrot/library/SDL/Constants.pir
- copied unchanged from r10724,
trunk/runtime/parrot/library/SDL/Constants.imc
trunk/runtime/parrot/library/SDL/Event.pir
- copied, changed from r10724, trunk/runtime/parrot/library/SDL/Event.imc
trunk/runtime/parrot/library/SDL/EventHandler.pir
- copied, changed from r10724,
trunk/runtime/parrot/library/SDL/EventHandler.imc
trunk/runtime/parrot/library/SDL/Font.pir
- copied, changed from r10724, trunk/runtime/parrot/library/SDL/Font.imc
trunk/runtime/parrot/library/SDL/Image.pir
- copied, changed from r10724, trunk/runtime/parrot/library/SDL/Image.imc
trunk/runtime/parrot/library/SDL/LCD.pir
- copied, changed from r10724, trunk/runtime/parrot/library/SDL/LCD.imc
trunk/runtime/parrot/library/SDL/Rect.pir
- copied, changed from r10724, trunk/runtime/parrot/library/SDL/Rect.imc
trunk/runtime/parrot/library/SDL/Sprite.pir
- copied, changed from r10724, trunk/runtime/parrot/library/SDL/Sprite.imc
trunk/runtime/parrot/library/SDL/StopWatch.pir
- copied, changed from r10724,
trunk/runtime/parrot/library/SDL/StopWatch.imc
trunk/runtime/parrot/library/SDL/Surface.pir
- copied, changed from r10724,
trunk/runtime/parrot/library/SDL/Surface.imc
Removed:
trunk/examples/sdl/anim_image.imc
trunk/examples/sdl/anim_image_dblbuf.imc
trunk/examples/sdl/blue_font.imc
trunk/examples/sdl/blue_rect.imc
trunk/examples/sdl/bounce_parrot_logo.imc
trunk/examples/sdl/lcd/clock.imc
trunk/examples/sdl/minesweeper/eventhandler.imc
trunk/examples/sdl/minesweeper/field.imc
trunk/examples/sdl/minesweeper/mines.imc
trunk/examples/sdl/move_parrot_logo.imc
trunk/examples/sdl/raw_pixels.imc
trunk/examples/sdl/tetris/app.imc
trunk/examples/sdl/tetris/block.imc
trunk/examples/sdl/tetris/blockdata.imc
trunk/examples/sdl/tetris/blocks.imc
trunk/examples/sdl/tetris/board.imc
trunk/examples/sdl/tetris/boarddata.imc
trunk/examples/sdl/tetris/eventhandler.imc
trunk/examples/sdl/tetris/tetris.imc
trunk/runtime/parrot/library/SDL.imc
trunk/runtime/parrot/library/SDL/App.imc
trunk/runtime/parrot/library/SDL/Button.imc
trunk/runtime/parrot/library/SDL/Color.imc
trunk/runtime/parrot/library/SDL/Constants.imc
trunk/runtime/parrot/library/SDL/Event.imc
trunk/runtime/parrot/library/SDL/EventHandler.imc
trunk/runtime/parrot/library/SDL/Font.imc
trunk/runtime/parrot/library/SDL/Image.imc
trunk/runtime/parrot/library/SDL/LCD.imc
trunk/runtime/parrot/library/SDL/Rect.imc
trunk/runtime/parrot/library/SDL/Sprite.imc
trunk/runtime/parrot/library/SDL/StopWatch.imc
trunk/runtime/parrot/library/SDL/Surface.imc
Modified:
trunk/MANIFEST
trunk/examples/sdl/minesweeper/README
trunk/examples/sdl/tetris/README
Log:
#37520: [TODO] rename library files from .imc to .pir
~SDL libraries and examples converted
Modified: trunk/MANIFEST
==============================================================================
--- trunk/MANIFEST (original)
+++ trunk/MANIFEST Wed Dec 28 10:20:09 2005
@@ -513,31 +513,31 @@ examples/pir/substr.pir
examples/pir/sudoku.pir [main]doc
examples/pir/thr-primes.pir [main]doc
examples/pir/uniq.pir [main]doc
-examples/sdl/anim_image.imc [devel]
-examples/sdl/anim_image_dblbuf.imc [devel]
-examples/sdl/blue_font.imc [devel]
-examples/sdl/blue_rect.imc [devel]
-examples/sdl/bounce_parrot_logo.imc [devel]
-examples/sdl/lcd/clock.imc [devel]
+examples/sdl/anim_image.pir [devel]
+examples/sdl/anim_image_dblbuf.pir [devel]
+examples/sdl/blue_font.pir [devel]
+examples/sdl/blue_rect.pir [devel]
+examples/sdl/bounce_parrot_logo.pir [devel]
+examples/sdl/lcd/clock.pir [devel]
examples/sdl/minesweeper/README [main]doc
-examples/sdl/minesweeper/eventhandler.imc [main]doc
-examples/sdl/minesweeper/field.imc [main]doc
-examples/sdl/minesweeper/mines.imc [main]doc
+examples/sdl/minesweeper/eventhandler.pir [main]doc
+examples/sdl/minesweeper/field.pir [main]doc
+examples/sdl/minesweeper/mines.pir [main]doc
examples/sdl/minesweeper/mines.png [main]doc
examples/sdl/minesweeper/mines_debug.png [main]doc
examples/sdl/minesweeper/smiley.png [main]doc
-examples/sdl/move_parrot_logo.imc [devel]
+examples/sdl/move_parrot_logo.pir [devel]
examples/sdl/parrot_small.png [devel]
-examples/sdl/raw_pixels.imc [devel]
+examples/sdl/raw_pixels.pir [devel]
examples/sdl/tetris/README [main]doc
-examples/sdl/tetris/app.imc [main]doc
-examples/sdl/tetris/block.imc [main]doc
-examples/sdl/tetris/blockdata.imc [main]doc
-examples/sdl/tetris/blocks.imc [main]doc
-examples/sdl/tetris/board.imc [main]doc
-examples/sdl/tetris/boarddata.imc [main]doc
-examples/sdl/tetris/eventhandler.imc [main]doc
-examples/sdl/tetris/tetris.imc [main]doc
+examples/sdl/tetris/app.pir [main]doc
+examples/sdl/tetris/block.pir [main]doc
+examples/sdl/tetris/blockdata.pir [main]doc
+examples/sdl/tetris/blocks.pir [main]doc
+examples/sdl/tetris/board.pir [main]doc
+examples/sdl/tetris/boarddata.pir [main]doc
+examples/sdl/tetris/eventhandler.pir [main]doc
+examples/sdl/tetris/tetris.pir [main]doc
examples/shootout/README [main]doc
examples/shootout/ack.pir [main]doc
examples/shootout/ack.py [main]doc
@@ -1461,21 +1461,21 @@ runtime/parrot/library/PGE/Glob.pir
runtime/parrot/library/PGE/Hs.pir [library]
runtime/parrot/library/PGE/Text.pir [library]
runtime/parrot/library/PGE/Util.pir [library]
-runtime/parrot/library/SDL.imc [library]
-runtime/parrot/library/SDL/App.imc [library]
-runtime/parrot/library/SDL/Button.imc [library]
-runtime/parrot/library/SDL/Color.imc [library]
-runtime/parrot/library/SDL/Constants.imc [library]
-runtime/parrot/library/SDL/Event.imc [library]
-runtime/parrot/library/SDL/EventHandler.imc [library]
-runtime/parrot/library/SDL/Font.imc [library]
-runtime/parrot/library/SDL/Image.imc [library]
-runtime/parrot/library/SDL/LCD.imc [library]
+runtime/parrot/library/SDL.pir [library]
+runtime/parrot/library/SDL/App.pir [library]
+runtime/parrot/library/SDL/Button.pir [library]
+runtime/parrot/library/SDL/Color.pir [library]
+runtime/parrot/library/SDL/Constants.pir [library]
+runtime/parrot/library/SDL/Event.pir [library]
+runtime/parrot/library/SDL/EventHandler.pir [library]
+runtime/parrot/library/SDL/Font.pir [library]
+runtime/parrot/library/SDL/Image.pir [library]
+runtime/parrot/library/SDL/LCD.pir [library]
runtime/parrot/library/SDL/LCD.png [library]
-runtime/parrot/library/SDL/Rect.imc [library]
-runtime/parrot/library/SDL/Sprite.imc [library]
-runtime/parrot/library/SDL/StopWatch.imc [library]
-runtime/parrot/library/SDL/Surface.imc [library]
+runtime/parrot/library/SDL/Rect.pir [library]
+runtime/parrot/library/SDL/Sprite.pir [library]
+runtime/parrot/library/SDL/StopWatch.pir [library]
+runtime/parrot/library/SDL/Surface.pir [library]
runtime/parrot/library/Stream/Base.imc [library]
runtime/parrot/library/Stream/Combiner.imc [library]
runtime/parrot/library/Stream/Coroutine.imc [library]
Copied: trunk/examples/sdl/anim_image.pir (from r10724,
trunk/examples/sdl/anim_image.imc)
==============================================================================
--- trunk/examples/sdl/anim_image.imc (original)
+++ trunk/examples/sdl/anim_image.pir Wed Dec 28 10:20:09 2005
@@ -1,23 +1,23 @@
=head1 TITLE
-anim_image.imc - animate an image in a Parrot SDL window
+anim_image.pir - animate an image in a Parrot SDL window
=head1 SYNOPSIS
To run this file, run the following command from the Parrot directory:
- $ ./parrot examples/sdl/anim_image.imc
+ $ ./parrot examples/sdl/anim_image.pir
Drew 1080 frames in 0.948230 seconds (1138.964142 fps)
$
=cut
.sub _main non_prototyped, :main
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Color.imc"
- load_bytecode "library/SDL/Rect.imc"
- load_bytecode "library/SDL/Image.imc"
- load_bytecode "library/SDL/Sprite.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Color.pir"
+ load_bytecode "library/SDL/Rect.pir"
+ load_bytecode "library/SDL/Image.pir"
+ load_bytecode "library/SDL/Sprite.pir"
.local pmc args
Copied: trunk/examples/sdl/anim_image_dblbuf.pir (from r10724,
trunk/examples/sdl/anim_image_dblbuf.imc)
==============================================================================
--- trunk/examples/sdl/anim_image_dblbuf.imc (original)
+++ trunk/examples/sdl/anim_image_dblbuf.pir Wed Dec 28 10:20:09 2005
@@ -1,23 +1,23 @@
=head1 TITLE
-anim_image_dblbuf.imc - animate an image in a doublebuffered Parrot SDL window
+anim_image_dblbuf.pir - animate an image in a doublebuffered Parrot SDL window
=head1 SYNOPSIS
To run this file, run the following command from the Parrot root directory:
- $ ./parrot examples/sdl/anim_image_dblbuf.imc
+ $ ./parrot examples/sdl/anim_image_dblbuf.pir
Drew 540 frames in 2.200484 seconds (245.400580 fps)
$
=cut
.sub _main non_prototyped, :main
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Color.imc"
- load_bytecode "library/SDL/Rect.imc"
- load_bytecode "library/SDL/Image.imc"
- load_bytecode "library/SDL/Sprite.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Color.pir"
+ load_bytecode "library/SDL/Rect.pir"
+ load_bytecode "library/SDL/Image.pir"
+ load_bytecode "library/SDL/Sprite.pir"
.local pmc args
args = new PerlHash
Copied: trunk/examples/sdl/blue_font.pir (from r10724,
trunk/examples/sdl/blue_font.imc)
==============================================================================
--- trunk/examples/sdl/blue_font.imc (original)
+++ trunk/examples/sdl/blue_font.pir Wed Dec 28 10:20:09 2005
@@ -1,12 +1,12 @@
=head1 TITLE
-blue_font.imc - draw a friendly message to the screen
+blue_font.pir - draw a friendly message to the screen
=head1 SYNOPSIS
To run this file, run the following command from the Parrot directory:
- $ ./parrot examples/sdl/blue_font.imc
+ $ ./parrot examples/sdl/blue_font.pir
$
Note that you'll need a font named C<times.ttf> in the current directory. I
@@ -20,10 +20,10 @@ royalty-free font file. Maybe soon.
.sub _main :main
# first load the necessary libraries
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Rect.imc"
- load_bytecode "library/SDL/Color.imc"
- load_bytecode "library/SDL/Font.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Rect.pir"
+ load_bytecode "library/SDL/Color.pir"
+ load_bytecode "library/SDL/Font.pir"
# arguments for the SDL::App constructor
.local pmc args
Copied: trunk/examples/sdl/blue_rect.pir (from r10724,
trunk/examples/sdl/blue_rect.imc)
==============================================================================
--- trunk/examples/sdl/blue_rect.imc (original)
+++ trunk/examples/sdl/blue_rect.pir Wed Dec 28 10:20:09 2005
@@ -1,12 +1,12 @@
=head1 TITLE
-blue_rect.imc - draw a blue rectangle with the SDL Parrot bindings
+blue_rect.pir - draw a blue rectangle with the SDL Parrot bindings
=head1 SYNOPSIS
To run this file, run the following command from the Parrot directory:
- $ ./parrot examples/sdl/blue_rect.imc
+ $ ./parrot examples/sdl/blue_rect.pir
$
=cut
@@ -14,9 +14,9 @@ To run this file, run the following comm
.sub _main :main
# first load the necessary libraries
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Rect.imc"
- load_bytecode "library/SDL/Color.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Rect.pir"
+ load_bytecode "library/SDL/Color.pir"
# arguments for the SDL::App constructor
.local pmc args
Copied: trunk/examples/sdl/bounce_parrot_logo.pir (from r10724,
trunk/examples/sdl/bounce_parrot_logo.imc)
==============================================================================
--- trunk/examples/sdl/bounce_parrot_logo.imc (original)
+++ trunk/examples/sdl/bounce_parrot_logo.pir Wed Dec 28 10:20:09 2005
@@ -1,12 +1,12 @@
=head1 TITLE
-bounce_parrot_logo.imc - bounce a Parrot logo with the SDL Parrot bindings
+bounce_parrot_logo.pir - bounce a Parrot logo with the SDL Parrot bindings
=head1 SYNOPSIS
To run this file, run the following command from the Parrot directory:
- $ parrot examples/sdl/bounce_parrot_logo.imc
+ $ parrot examples/sdl/bounce_parrot_logo.pir
$
You'll see the happy Parrot logo in the middle of a new SDL window. Use the
@@ -16,13 +16,13 @@ Use the Escape key or close the window w
=cut
.sub _main :main
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Color.imc"
- load_bytecode "library/SDL/Rect.imc"
- load_bytecode "library/SDL/Image.imc"
- load_bytecode "library/SDL/Sprite.imc"
- load_bytecode "library/SDL/EventHandler.imc"
- load_bytecode "library/SDL/Event.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Color.pir"
+ load_bytecode "library/SDL/Rect.pir"
+ load_bytecode "library/SDL/Image.pir"
+ load_bytecode "library/SDL/Sprite.pir"
+ load_bytecode "library/SDL/EventHandler.pir"
+ load_bytecode "library/SDL/Event.pir"
.local pmc app_args
new app_args, .PerlHash
Copied: trunk/examples/sdl/lcd/clock.pir (from r10724,
trunk/examples/sdl/lcd/clock.imc)
==============================================================================
--- trunk/examples/sdl/lcd/clock.imc (original)
+++ trunk/examples/sdl/lcd/clock.pir Wed Dec 28 10:20:09 2005
@@ -1,10 +1,10 @@
=head1 NAME
-clock.imc - LCD clock
+clock.pir - LCD clock
=head1 SYNOPSIS
- ./parrot examples/sdl/lcd/clock.imc
+ ./parrot examples/sdl/lcd/clock.pir
=head1 DESCRIPTION
@@ -26,10 +26,10 @@ The main function.
=cut
.sub _main :main
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Event.imc"
- load_bytecode "library/SDL/EventHandler.imc"
- load_bytecode "library/SDL/LCD.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Event.pir"
+ load_bytecode "library/SDL/EventHandler.pir"
+ load_bytecode "library/SDL/LCD.pir"
# set some screen properties
$P0 = new PerlHash
Modified: trunk/examples/sdl/minesweeper/README
==============================================================================
--- trunk/examples/sdl/minesweeper/README (original)
+++ trunk/examples/sdl/minesweeper/README Wed Dec 28 10:20:09 2005
@@ -1,4 +1,4 @@
To run this example, be in the Parrot directory
and run the following command:
-./parrot examples/sdl/minesweeper/mines.imc
+./parrot examples/sdl/minesweeper/mines.pir
Copied: trunk/examples/sdl/minesweeper/eventhandler.pir (from r10724,
trunk/examples/sdl/minesweeper/eventhandler.imc)
==============================================================================
--- trunk/examples/sdl/minesweeper/eventhandler.imc (original)
+++ trunk/examples/sdl/minesweeper/eventhandler.pir Wed Dec 28 10:20:09 2005
@@ -1,6 +1,6 @@
=head1 TITLE
-eventhandler.imc - a minesweeper event handler
+eventhandler.pir - a minesweeper event handler
=head1 SYNOPSIS
Copied: trunk/examples/sdl/minesweeper/field.pir (from r10724,
trunk/examples/sdl/minesweeper/field.imc)
==============================================================================
--- trunk/examples/sdl/minesweeper/field.imc (original)
+++ trunk/examples/sdl/minesweeper/field.pir Wed Dec 28 10:20:09 2005
@@ -1095,13 +1095,13 @@ This method is called automatically when
.local int rect_type
.local int surface_type
- load_bytecode "examples/sdl/minesweeper/eventhandler.imc"
- load_bytecode "library/SDL/Button.imc"
- load_bytecode "library/SDL/StopWatch.imc"
- load_bytecode "library/SDL/Image.imc"
+ load_bytecode "examples/sdl/minesweeper/eventhandler.pir"
+ load_bytecode "library/SDL/Button.pir"
+ load_bytecode "library/SDL/StopWatch.pir"
+ load_bytecode "library/SDL/Image.pir"
# XXX: remove
- load_bytecode "library/Data/Dumper.imc"
+ load_bytecode "library/Data/Dumper.pir"
$P0 = new PerlString
$P0 = "examples/sdl/minesweeper/mines.png"
Copied: trunk/examples/sdl/minesweeper/mines.pir (from r10724,
trunk/examples/sdl/minesweeper/mines.imc)
==============================================================================
--- trunk/examples/sdl/minesweeper/mines.imc (original)
+++ trunk/examples/sdl/minesweeper/mines.pir Wed Dec 28 10:20:09 2005
@@ -1,12 +1,12 @@
=head1 TITLE
-mines.imc - a minesweeper clone for parrot (with parrot's SDL bindings)
+mines.pir - a minesweeper clone for parrot (with parrot's SDL bindings)
=head1 SYNOPSIS
To run this game, be in the Parrot directory and run the following command:
- $ parrot examples/sdl/minesweeper/mines.imc
+ $ parrot examples/sdl/minesweeper/mines.pir
$
=head1 FUNCTIONS
@@ -29,14 +29,14 @@ The main function.
debug = args
dec debug
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Event.imc"
- load_bytecode "library/SDL/EventHandler.imc"
- load_bytecode "library/SDL/Rect.imc"
- load_bytecode "library/SDL/Surface.imc"
- load_bytecode "library/SDL/Color.imc"
- load_bytecode "library/SDL/Image.imc"
- load_bytecode "examples/sdl/minesweeper/field.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Event.pir"
+ load_bytecode "library/SDL/EventHandler.pir"
+ load_bytecode "library/SDL/Rect.pir"
+ load_bytecode "library/SDL/Surface.pir"
+ load_bytecode "library/SDL/Color.pir"
+ load_bytecode "library/SDL/Image.pir"
+ load_bytecode "examples/sdl/minesweeper/field.pir"
# setup the screen properties
$P0 = new PerlHash
Copied: trunk/examples/sdl/move_parrot_logo.pir (from r10724,
trunk/examples/sdl/move_parrot_logo.imc)
==============================================================================
--- trunk/examples/sdl/move_parrot_logo.imc (original)
+++ trunk/examples/sdl/move_parrot_logo.pir Wed Dec 28 10:20:09 2005
@@ -1,24 +1,24 @@
=head1 TITLE
-move_parrot_logo.imc - move a Parrot logo with the SDL Parrot bindings
+move_parrot_logo.pir - move a Parrot logo with the SDL Parrot bindings
=head1 SYNOPSIS
To run this file, run the following command from the Parrot directory:
- $ parrot examples/sdl/move_parrot_logo.imc
+ $ parrot examples/sdl/move_parrot_logo.pir
$
=cut
.sub _main :main
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Color.imc"
- load_bytecode "library/SDL/Rect.imc"
- load_bytecode "library/SDL/Image.imc"
- load_bytecode "library/SDL/Sprite.imc"
- load_bytecode "library/SDL/EventHandler.imc"
- load_bytecode "library/SDL/Event.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Color.pir"
+ load_bytecode "library/SDL/Rect.pir"
+ load_bytecode "library/SDL/Image.pir"
+ load_bytecode "library/SDL/Sprite.pir"
+ load_bytecode "library/SDL/EventHandler.pir"
+ load_bytecode "library/SDL/Event.pir"
.local pmc app_args
new app_args, .PerlHash
Copied: trunk/examples/sdl/raw_pixels.pir (from r10724,
trunk/examples/sdl/raw_pixels.imc)
==============================================================================
--- trunk/examples/sdl/raw_pixels.imc (original)
+++ trunk/examples/sdl/raw_pixels.pir Wed Dec 28 10:20:09 2005
@@ -1,12 +1,12 @@
=head1 TITLE
-raw_pixels.imc - paint the screen blue, pixel by pixel
+raw_pixels.pir - paint the screen blue, pixel by pixel
=head1 SYNOPSIS
To run this file, run the following command from the Parrot directory:
- $ ./parrot examples/sdl/raw_pixels.imc
+ $ ./parrot examples/sdl/raw_pixels.pir
$
=cut
@@ -15,9 +15,9 @@ To run this file, run the following comm
.sub _main :main
# first load the necessary libraries
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Rect.imc"
- load_bytecode "library/SDL/Color.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Rect.pir"
+ load_bytecode "library/SDL/Color.pir"
# arguments for the SDL::App constructor
.local pmc args
Modified: trunk/examples/sdl/tetris/README
==============================================================================
--- trunk/examples/sdl/tetris/README (original)
+++ trunk/examples/sdl/tetris/README Wed Dec 28 10:20:09 2005
@@ -1,4 +1,4 @@
To run this example, be in the Parrot directory
and run the following command:
-./parrot examples/sdl/tetris/tetris.imc
+./parrot examples/sdl/tetris/tetris.pir
Copied: trunk/examples/sdl/tetris/app.pir (from r10724,
trunk/examples/sdl/tetris/app.imc)
==============================================================================
--- trunk/examples/sdl/tetris/app.imc (original)
+++ trunk/examples/sdl/tetris/app.pir Wed Dec 28 10:20:09 2005
@@ -1,6 +1,6 @@
=head1 TITLE
-app.imc - a tetris application object
+app.pir - a tetris application object
B<Note:> The Tetris::App class is implemented as a singleton.
@@ -44,13 +44,13 @@ it parent classes nor is it subclassed.
find_type $I0, "Tetris::App"
if $I0 > 1 goto END
- load_bytecode "library/SDL/App.imc"
- load_bytecode "library/SDL/Color.imc"
- load_bytecode "library/SDL/Event.imc"
- load_bytecode "library/SDL/Rect.imc"
+ load_bytecode "library/SDL/App.pir"
+ load_bytecode "library/SDL/Color.pir"
+ load_bytecode "library/SDL/Event.pir"
+ load_bytecode "library/SDL/Rect.pir"
- load_bytecode "examples/sdl/tetris/eventhandler.imc"
- load_bytecode "examples/sdl/tetris/board.imc"
+ load_bytecode "examples/sdl/tetris/eventhandler.pir"
+ load_bytecode "examples/sdl/tetris/board.pir"
newclass $P0, "Tetris::App"
Copied: trunk/examples/sdl/tetris/block.pir (from r10724,
trunk/examples/sdl/tetris/block.imc)
==============================================================================
--- trunk/examples/sdl/tetris/block.imc (original)
+++ trunk/examples/sdl/tetris/block.pir Wed Dec 28 10:20:09 2005
@@ -1,6 +1,6 @@
=head1 TITLE
-block.imc - a tetris block class
+block.pir - a tetris block class
=head1 SYNOPSIS
@@ -30,7 +30,7 @@ is not subclassed further.
.sub __onload :load
find_type $I0, "Tetris::Block"
if $I0 > 1 goto END
- load_bytecode "examples/sdl/tetris/blockdata.imc"
+ load_bytecode "examples/sdl/tetris/blockdata.pir"
getclass $P0, "Tetris::BlockData"
subclass $P0, $P0, "Tetris::Block"
Copied: trunk/examples/sdl/tetris/blockdata.pir (from r10724,
trunk/examples/sdl/tetris/blockdata.imc)
==============================================================================
--- trunk/examples/sdl/tetris/blockdata.imc (original)
+++ trunk/examples/sdl/tetris/blockdata.pir Wed Dec 28 10:20:09 2005
@@ -1,6 +1,6 @@
=head1 TITLE
-blockdata.imc - a tetris block data class
+blockdata.pir - a tetris block data class
=head1 SYNOPSIS
Copied: trunk/examples/sdl/tetris/blocks.pir (from r10724,
trunk/examples/sdl/tetris/blocks.imc)
==============================================================================
--- trunk/examples/sdl/tetris/blocks.imc (original)
+++ trunk/examples/sdl/tetris/blocks.pir Wed Dec 28 10:20:09 2005
@@ -1,6 +1,6 @@
=head1 TITLE
-blocks.imc - tetris block classes
+blocks.pir - tetris block classes
=cut
@@ -10,7 +10,7 @@ blocks.imc - tetris block classes
find_type $I0, "Tetris::Block::1"
if $I0 > 1 goto END
- load_bytecode "examples/sdl/tetris/block.imc"
+ load_bytecode "examples/sdl/tetris/block.pir"
getclass $P1, "Tetris::Block"
Copied: trunk/examples/sdl/tetris/board.pir (from r10724,
trunk/examples/sdl/tetris/board.imc)
==============================================================================
--- trunk/examples/sdl/tetris/board.imc (original)
+++ trunk/examples/sdl/tetris/board.pir Wed Dec 28 10:20:09 2005
@@ -1,6 +1,6 @@
=head1 TITLE
-board.imc - a tetris board class.
+board.pir - a tetris board class.
=head1 SYNOPSIS
@@ -16,15 +16,15 @@ board.imc - a tetris board class.
=cut
-.include "library/dumper.imc"
+.include "library/dumper.pir"
.namespace ["Tetris::Board"]
.sub __onload :load
find_type $I0, "Tetris::Board"
if $I0 > 1 goto END
- load_bytecode "examples/sdl/tetris/boarddata.imc"
- load_bytecode "examples/sdl/tetris/blocks.imc"
+ load_bytecode "examples/sdl/tetris/boarddata.pir"
+ load_bytecode "examples/sdl/tetris/blocks.pir"
getclass $P0, "Tetris::BoardData"
subclass $P0, $P0, "Tetris::Board"
Copied: trunk/examples/sdl/tetris/boarddata.pir (from r10724,
trunk/examples/sdl/tetris/boarddata.imc)
==============================================================================
--- trunk/examples/sdl/tetris/boarddata.imc (original)
+++ trunk/examples/sdl/tetris/boarddata.pir Wed Dec 28 10:20:09 2005
@@ -1,6 +1,6 @@
=head1 TITLE
-boarddata.imc - a tetris board data class
+boarddata.pir - a tetris board data class
=head1 SYNOPSIS
Copied: trunk/examples/sdl/tetris/eventhandler.pir (from r10724,
trunk/examples/sdl/tetris/eventhandler.imc)
==============================================================================
--- trunk/examples/sdl/tetris/eventhandler.imc (original)
+++ trunk/examples/sdl/tetris/eventhandler.pir Wed Dec 28 10:20:09 2005
@@ -1,6 +1,6 @@
=head1 TITLE
-eventhandler.imc - a tetris event handler class
+eventhandler.pir - a tetris event handler class
=cut
@@ -9,7 +9,7 @@ eventhandler.imc - a tetris event handle
.sub __onload :load
find_type $I0, "Tetris::EventHandler"
if $I0 > 1 goto END
- load_bytecode "library/SDL/EventHandler.imc"
+ load_bytecode "library/SDL/EventHandler.pir"
getclass $P0, "SDL::EventHandler"
subclass $P0, $P0, "Tetris::EventHandler"
Copied: trunk/examples/sdl/tetris/tetris.pir (from r10724,
trunk/examples/sdl/tetris/tetris.imc)
==============================================================================
--- trunk/examples/sdl/tetris/tetris.imc (original)
+++ trunk/examples/sdl/tetris/tetris.pir Wed Dec 28 10:20:09 2005
@@ -1,12 +1,12 @@
=head1 TITLE
-tetris.imc - a second tetris for parrot (with parrot's SDL bindings)
+tetris.pir - a second tetris for parrot (with parrot's SDL bindings)
=head1 SYNOPSIS
To run this file, be in the Parrot directory and run the following command:
- $ parrot examples/sdl/tetris/tetris.imc
+ $ parrot examples/sdl/tetris/tetris.pir
$
=head1 FUNCTIONS
@@ -31,7 +31,7 @@ Array with commandline parameters.
.param pmc argv
.local pmc app
- load_bytecode "examples/sdl/tetris/app.imc"
+ load_bytecode "examples/sdl/tetris/app.pir"
# create the tetris app
find_type $I0, "Tetris::App"
Copied: trunk/runtime/parrot/library/SDL/App.pir (from r10724,
trunk/runtime/parrot/library/SDL/App.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/App.imc (original)
+++ trunk/runtime/parrot/library/SDL/App.pir Wed Dec 28 10:20:09 2005
@@ -5,7 +5,7 @@ SDL::App - Parrot extension for SDL Appl
=head1 SYNOPSIS
# load this library
- load_bytecode 'library/SDL/App.imc'
+ load_bytecode 'library/SDL/App.pir'
# create a new SDL::App object
.local pmc app
@@ -62,9 +62,9 @@ The SDL::App object has the following me
.sub _initialize @LOAD
.include 'datatypes.pasm'
- load_bytecode 'library/SDL.imc'
- load_bytecode 'library/SDL/Surface.imc'
- load_bytecode 'library/SDL/Constants.imc'
+ load_bytecode 'library/SDL.pir'
+ load_bytecode 'library/SDL/Surface.pir'
+ load_bytecode 'library/SDL/Constants.pir'
.local pmc app_class
Copied: trunk/runtime/parrot/library/SDL/Color.pir (from r10724,
trunk/runtime/parrot/library/SDL/Color.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/Color.imc (original)
+++ trunk/runtime/parrot/library/SDL/Color.pir Wed Dec 28 10:20:09 2005
@@ -4,7 +4,7 @@ SDL::Color - Parrot class representing c
=head1 SYNOPSIS
- load_bytecode 'library/SDL/Color.imc'
+ load_bytecode 'library/SDL/Color.pir'
# create a new SDL::Color object
.local pmc color
Copied: trunk/runtime/parrot/library/SDL/Event.pir (from r10724,
trunk/runtime/parrot/library/SDL/Event.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/Event.imc (original)
+++ trunk/runtime/parrot/library/SDL/Event.pir Wed Dec 28 10:20:09 2005
@@ -5,7 +5,7 @@ SDL::Event - Parrot extension representi
=head1 SYNOPSIS
# load this library
- load_bytecode 'library/SDL/Event.imc'
+ load_bytecode 'library/SDL/Event.pir'
# create a new SDL::Event object
.local pmc event
Copied: trunk/runtime/parrot/library/SDL/EventHandler.pir (from r10724,
trunk/runtime/parrot/library/SDL/EventHandler.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/EventHandler.imc (original)
+++ trunk/runtime/parrot/library/SDL/EventHandler.pir Wed Dec 28 10:20:09 2005
@@ -5,8 +5,8 @@ SDL::EventHandler - base class for appli
=head1 SYNOPSIS
# load the event class and this library
- load_bytecode 'library/SDL/Event.imc'
- load_bytecode 'library/SDL/EventHandler.imc'
+ load_bytecode 'library/SDL/Event.pir'
+ load_bytecode 'library/SDL/EventHandler.pir'
# subclass this class
.local pmc parent_class
Copied: trunk/runtime/parrot/library/SDL/Font.pir (from r10724,
trunk/runtime/parrot/library/SDL/Font.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/Font.imc (original)
+++ trunk/runtime/parrot/library/SDL/Font.pir Wed Dec 28 10:20:09 2005
@@ -5,7 +5,7 @@ SDL::Font - Parrot class representing fo
=head1 SYNOPSIS
# load this library
- load_bytecode 'library/SDL/Font.imc'
+ load_bytecode 'library/SDL/Font.pir'
# set the font's arguments
.local pmc font_args
Copied: trunk/runtime/parrot/library/SDL/Image.pir (from r10724,
trunk/runtime/parrot/library/SDL/Image.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/Image.imc (original)
+++ trunk/runtime/parrot/library/SDL/Image.pir Wed Dec 28 10:20:09 2005
@@ -5,7 +5,7 @@ SDL::Image - Parrot class representing i
=head1 SYNOPSIS
# load this library
- load_bytecode 'library/SDL/Image.imc'
+ load_bytecode 'library/SDL/Image.pir'
# set a filename in a PMC
.local pmc filename
Copied: trunk/runtime/parrot/library/SDL/LCD.pir (from r10724,
trunk/runtime/parrot/library/SDL/LCD.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/LCD.imc (original)
+++ trunk/runtime/parrot/library/SDL/LCD.pir Wed Dec 28 10:20:09 2005
@@ -40,8 +40,8 @@ An SDL::LCD object has the following met
$I0 = find_type 'SDL::LCD'
if $I0 > 1 goto END
- load_bytecode "library/SDL/Image.imc"
- load_bytecode "library/SDL/Rect.imc"
+ load_bytecode "library/SDL/Image.pir"
+ load_bytecode "library/SDL/Rect.pir"
$P0 = new PerlString
$P0 = "runtime/parrot/library/SDL/LCD.png"
Copied: trunk/runtime/parrot/library/SDL/Rect.pir (from r10724,
trunk/runtime/parrot/library/SDL/Rect.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/Rect.imc (original)
+++ trunk/runtime/parrot/library/SDL/Rect.pir Wed Dec 28 10:20:09 2005
@@ -5,7 +5,7 @@ SDL::Rect - Parrot class representing re
=head1 SYNOPSIS
# load this library
- load_bytecode 'library/SDL/Rect.imc'
+ load_bytecode 'library/SDL/Rect.pir'
# create a new SDL::Rect object
.local pmc rect
Copied: trunk/runtime/parrot/library/SDL/Sprite.pir (from r10724,
trunk/runtime/parrot/library/SDL/Sprite.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/Sprite.imc (original)
+++ trunk/runtime/parrot/library/SDL/Sprite.pir Wed Dec 28 10:20:09 2005
@@ -5,7 +5,7 @@ SDL::Sprite - Parrot class representing
=head1 SYNOPSIS
# load this library
- load_bytecode 'library/SDL/Sprite.imc'
+ load_bytecode 'library/SDL/Sprite.pir'
# ... load a new SDL::Image into image
Copied: trunk/runtime/parrot/library/SDL/StopWatch.pir (from r10724,
trunk/runtime/parrot/library/SDL/StopWatch.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/StopWatch.imc (original)
+++ trunk/runtime/parrot/library/SDL/StopWatch.pir Wed Dec 28 10:20:09 2005
@@ -37,7 +37,7 @@ An SDL::StopWatch object has the followi
$I0 = find_type 'SDL::StopWatch'
if $I0 > 1 goto END
- load_bytecode "library/SDL/LCD.imc"
+ load_bytecode "library/SDL/LCD.pir"
$P0 = getclass 'SDL::LCD'
$P0 = subclass $P0, 'SDL::StopWatch'
addattribute $P0, "time"
Copied: trunk/runtime/parrot/library/SDL/Surface.pir (from r10724,
trunk/runtime/parrot/library/SDL/Surface.imc)
==============================================================================
--- trunk/runtime/parrot/library/SDL/Surface.imc (original)
+++ trunk/runtime/parrot/library/SDL/Surface.pir Wed Dec 28 10:20:09 2005
@@ -5,7 +5,7 @@ SDL::Surface - Parrot class representing
=head1 SYNOPSIS
# load this library
- load_bytecode 'library/SDL/Surface.imc'
+ load_bytecode 'library/SDL/Surface.pir'
# set the surface's arguments
.local pmc surface_args
