Author: particle
Date: Mon Nov 10 08:36:23 2008
New Revision: 32488

Modified:
   trunk/runtime/parrot/library/File/Spec.pir

Log:
[library] replace "_get_osname" body with sysinfo call; jimmy++

Modified: trunk/runtime/parrot/library/File/Spec.pir
==============================================================================
--- trunk/runtime/parrot/library/File/Spec.pir  (original)
+++ trunk/runtime/parrot/library/File/Spec.pir  Mon Nov 10 08:36:23 2008
@@ -100,14 +100,11 @@
 .end
 
 
-.sub '_get_osname'
-    .local pmc config
-    .local pmc osname
-
-    config= '_config'()
-    osname= config['osname']
+.include 'sysinfo.pasm'
 
-    .return( osname )
+.sub '_get_osname'
+    $S0 = sysinfo .SYSINFO_PARROT_OS
+    .return ( $S0 )
 .end
 
 

Reply via email to