# Arguments: *IN : file descriptor for file being parsed # $line$ : contains remainder of current line # $filename$ : name of file # Return Values: $quote$ : quoted text, minus the first quote # $rest$ : everything after the quoted text # Description: This subroutine accepts a line following a found ' operator. # It finds the matching end ' and returns both the entire # quote (including the end ') and any and all code following # the end ' on the same line.