develooper Front page | perl.cvs.parrot | Postings from January 2009

[svn:parrot] r35062 - trunk/languages/befunge

From:
jquelin
Date:
January 6, 2009 10:38
Subject:
[svn:parrot] r35062 - trunk/languages/befunge
Message ID:
20090106183822.84844CB9F9@x12.develooper.com
Author: jquelin
Date: Tue Jan  6 10:38:21 2009
New Revision: 35062

Added:
   trunk/languages/befunge/maths.pir
      - copied, changed from r35014, /trunk/languages/befunge/maths.pasm

Log:
maths.pasm moved to pir


Copied: trunk/languages/befunge/maths.pir (from r35014, /trunk/languages/befunge/maths.pasm)
==============================================================================
--- /trunk/languages/befunge/maths.pasm	(original)
+++ trunk/languages/befunge/maths.pir	Tue Jan  6 10:38:21 2009
@@ -1,11 +1,14 @@
 # $Id$
 
+.macro_const RANDMAX 65536.0
+
+=pod
+
 # Create a pseudo-random number.
 # Parrot's stack:
 #   before:     ... max
 #   after:      ... rand
 # 0 <= rand < max
-.macro_const RANDMAX 65536.0
 MATHS_RAND:
         restore I10
         mul N0, N0, 5.0
@@ -127,3 +130,4 @@
         push P2, I10
         branch MOVE_PC
 
+=cut



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About