This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Small doc and whitespace edits.
authorJarkko Hietaniemi <jhi@iki.fi>
Mon, 13 Sep 1999 20:16:20 +0000 (20:16 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Mon, 13 Sep 1999 20:16:20 +0000 (20:16 +0000)
p4raw-id: //depot/cfgperl@4143

ext/DynaLoader/dl_aix.xs
ext/DynaLoader/dl_beos.xs
ext/DynaLoader/dl_cygwin.xs
ext/DynaLoader/dl_hpux.xs
ext/DynaLoader/dl_mpeix.xs
ext/DynaLoader/dl_next.xs
ext/DynaLoader/dl_rhapsody.xs
ext/DynaLoader/dl_vmesa.xs
pod/perldelta.pod

index c00ded2..96bce4e 100644 (file)
@@ -590,7 +590,7 @@ dl_load_file(filename, flags=0)
        if (RETVAL == NULL)
            SaveError(aTHX_ "%s",dlerror()) ;
        else
-           sv_setiv( ST(0), PTR2IV(RETVAL));
+           sv_setiv( ST(0), PTR2IV(RETVAL) );
 
 
 void *
index 4245910..c26824e 100644 (file)
@@ -54,7 +54,7 @@ dl_load_file(filename, flags=0)
        PerlIO_printf(PerlIO_stderr(), "load_add_on(%s) : %d (%s)\n", path, bogo, strerror(bogo));
     } else {
        RETVAL = (void *) bogo;
-       sv_setiv( ST(0), PTR2IV(RETVAL));
+       sv_setiv( ST(0), PTR2IV(RETVAL) );
     }
     free(path);
 }
index 60a605f..7f74cdd 100644 (file)
@@ -95,7 +95,7 @@ dl_load_file(filename,flags=0)
     if (RETVAL == NULL){
        SaveError(aTHX_ "%d",GetLastError()) ;
     } else {
-       sv_setiv( ST(0), PTR2IV(RETVAL));
+       sv_setiv( ST(0), PTR2IV(RETVAL) );
     }
    }
        
index 71896b3..180679f 100644 (file)
@@ -92,7 +92,7 @@ end:
     if (obj == NULL)
         SaveError(aTHX_ "%s",Strerror(errno));
     else
-        sv_setiv( ST(0), PTR2IV(obj));
+        sv_setiv( ST(0), PTR2IV(obj) );
 
 
 void *
@@ -124,7 +124,7 @@ dl_find_symbol(libhandle, symbolname)
     if (status == -1) {
        SaveError(aTHX_ "%s",(errno) ? Strerror(errno) : "Symbol not found") ;
     } else {
-       sv_setiv( ST(0), PTR2IV(symaddr));
+       sv_setiv( ST(0), PTR2IV(symaddr) );
     }
 
 
index 65c0297..913e259 100644 (file)
@@ -74,7 +74,7 @@ flags));
     if (obj == NULL)
         SaveError(aTHX_"%s",Strerror(errno));
     else
-        sv_setiv( ST(0), PTR2IV(obj));
+        sv_setiv( ST(0), PTR2IV(obj) );
 
 void *
 dl_find_symbol(libhandle, symbolname)
@@ -100,7 +100,7 @@ dl_find_symbol(libhandle, symbolname)
     if (status != 0) {
         SaveError(aTHX_"%s",(errno) ? Strerror(errno) : "Symbol not found") ;
     } else {
-        sv_setiv( ST(0), PTR2IV(symaddr));
+        sv_setiv( ST(0), PTR2IV(symaddr) );
     }
 
 void
index 6c8009b..54d4be0 100644 (file)
@@ -252,7 +252,7 @@ dl_load_file(filename, flags=0)
     if (RETVAL == NULL)
        SaveError(aTHX_ "%s",dlerror()) ;
     else
-       sv_setiv( ST(0), PTR2IV(RETVAL));
+       sv_setiv( ST(0), PTR2IV(RETVAL) );
 
 
 void *
@@ -273,7 +273,7 @@ dl_find_symbol(libhandle, symbolname)
     if (RETVAL == NULL)
        SaveError(aTHX_ "%s",dlerror()) ;
     else
-       sv_setiv( ST(0), PTR2IV(RETVAL));
+       sv_setiv( ST(0), PTR2IV(RETVAL) );
 
 
 void
index d75b838..a56452e 100644 (file)
@@ -166,7 +166,7 @@ dl_load_file(filename, flags=0)
     if (RETVAL == NULL)
        SaveError(aTHX_ "%s",dlerror()) ;
     else
-       sv_setiv( ST(0), PTR2IV(RETVAL));
+       sv_setiv( ST(0), PTR2IV(RETVAL) );
 
 
 void *
@@ -185,7 +185,7 @@ dl_find_symbol(libhandle, symbolname)
     if (RETVAL == NULL)
        SaveError(aTHX_ "%s",dlerror()) ;
     else
-       sv_setiv( ST(0), PTR2IV(RETVAL));
+       sv_setiv( ST(0), PTR2IV(RETVAL) );
 
 
 void
index 400793f..9e4908c 100644 (file)
@@ -123,7 +123,7 @@ dl_load_file(filename, flags=0)
     if (RETVAL == NULL)
        SaveError(aTHX_ "%s",dlerror()) ;
     else
-       sv_setiv( ST(0), PTR2IV(RETVAL));
+       sv_setiv( ST(0), PTR2IV(RETVAL) );
  
  
 void *
@@ -141,7 +141,7 @@ dl_find_symbol(libhandle, symbolname)
     if (RETVAL == NULL)
        SaveError(aTHX_ "%s",dlerror()) ;
     else
-       sv_setiv( ST(0), PTR2IV(RETVAL));
+       sv_setiv( ST(0), PTR2IV(RETVAL) );
  
  
 void
index f77ab5d..de5a718 100644 (file)
@@ -158,7 +158,7 @@ use "quads" (64-integers) as follows:
 
 =item printed as such
 
-=item pack() and unpack() "q" and "Q" formatS
+=item pack() and unpack() "q" and "Q" formats
 
 =item in basic arithmetics: + - * / %
 
@@ -169,8 +169,9 @@ use "quads" (64-integers) as follows:
 Note that unless you have the case (a) you will have to configure
 and compile Perl using the -Duse64bits Configure flag.
 
-Unfortunately bit arithmetics (&, |, ^, ~, <<, >>) are not 64-bit clean,
-they are explictly forced to be 32-bit.
+Unfortunately bit arithmetics (&, |, ^, ~, <<, >>) for numbers are not
+64-bit clean, they are explictly forced to be 32-bit.  Bit arithmetics
+for bit vectors (created by vec()) are not limited in their width.
 
 Last but not least: note that due to Perl's habit of always using
 floating point numbers the quads are still not true integers.
@@ -185,17 +186,17 @@ If you have filesystems that support "large files" (files larger than
 2 gigabytes), you may now also be able to create and access them from Perl.
 
 Note that in addition to requiring a proper file system to do this you
-may also need to adjust your per-process (or even your per-system)
-maximum filesize limits before running Perl scripts that try to handle
-large files, especially if you intend to write such files.
+may also need to adjust your per-process (or your per-system, or per-user-group)
+maximum filesize limits before running Perl scripts that try to handle large
+files, especially if you intend to write such files.
 
 Adjusting your file system/system limits is outside the scope of Perl.
 For process limits, you may try to increase the limits using your
 shell's limit/ulimit command before running Perl.  The BSD::Resource
 extension (not included with the standard Perl distribution) may also
-be of use.
+be of use, it contains getrlimit/setrlimit calls.
  
-(Large file support is also related to 64-bit support, for obvious reasons)
+(Large file support is related to 64-bit support, for obvious reasons.)
 
 =head2 Better syntax checks on parenthesized unary operators
 
@@ -753,6 +754,13 @@ because many scripts assume to find Perl in /usr/bin/perl.
 You can use "Configure -Dusesocks" which causes Perl to probe
 for the SOCKS proxy protocol library, http://www.socks.nec.com/
 
+=head2 -A flag
+
+You can "post-edit" the Configure variables using the Configure -A
+flag.  The editing happens immediately after the platform specific
+hints files have been processed but before the actual configuration
+process starts.  Run Configure -h to find out the full -A syntax.
+
 =head1 BUGS
 
 If you find what you think is a bug, you might check the headers of