/*
CLASS {NATIVE_Localize_str|_Java}, NATIVE, UNTESTED :

IMPORT: {System_functions}, {String_functions} .



(************************/

import java.util.ArrayList;
import java.io.*;

public class NATIVE_Localize_str {

    public static boolean untranslated_saved;
    public static String directory_lang = "";

    /*

    //{ get strings stored by a compiler }
    
    FUN Set_path_directory_lang|uage_files( STR Dir|ectory_path ),
        NATIVE :
        "    NATIVE_Localize_str.directory_lang = X_Dir;" .
        
    FUN Get_path_directory_lang ==> STR, NATIVE :
        "    RESULT = NATIVE_Localize_str.directory_lang;" .
    
    FUN Get_untranslated_strings( STR S|trings_array[] ), NATIVE:
        S[].Clear
        NATIVE @
        "   for (int i = 0; i < AL4_system.Localize_str.length; i++)"
        "       if (AL4_system.Localize_str[i] == " #QU#QU ")"
        "           if (AL4_system.Localize_name[i].charAt(0) "
        "              != '[')"
        "              X_S.Add(" #QU "[" #QU " + AL4_system.Localize_name[i] + " 
        "              " #QU "]" #QU ");"
        "           else X_S.Add(AL4_system.Localize_name[i]);"
        "       else X_S.Add(AL4_system.Localize_name[i] + "
        "           " #QU "=" #QU " + AL4_system.Localize_str[i]);" 
        .
        
    FUN Set_translated_strings( STR N|ames_array[], STR S|trings_array[]), 
        NATIVE :
       @"   for (int i = 0; i < X_S.Count(); i++)"
        "       if (i < AL4_system.Localize_name.length)"
        "       {"
        "           AL4_system.Localize_name[i] = X_N.Get_item(i);"
        "           AL4_system.Localize_str[i] = X_S.Get_item(i);"
        "       }"
        "       else break;" .
        
    FUN Are_untranslated_saved ==> BOOL, NATIVE :
        "RESULT = NATIVE_Localize_str.untranslated_saved;" .
        
    FUN Set_untranslated_saved( BOOL Sav|ed_flag ), NATIVE :
        "NATIVE_Localize_str.untranslated_saved = X_Sav;" .
        
    FUN Path_translated_strings ==> STR :
        RESULT = (Get_application_data_dir.Trailing_slash 
        "" Application_name).Trailing_slash .
        
END
*/

}